tüm üyelerim ramazanı mubarek olsun
degerli hocalarım ekteki programımda ve resimlede anlatmaya calıştıgım formun üzerindaki alt formun verilerinin genel toplamını formdaki metin kutusunda gösterebiliyorum ama formun taplosuna kayıt ettiremiyorum aslında teamüllere aykırı ama almak istediğim raporda taplodaki alt formun genel toplamını kayıt ettiremediğm için raporda ilk girilen veriyi gösteriyor sizlerden istegim formdaki yapılan poz m adlı metin kutusundaki degeri taploya kayıt ettirmek emegi gecen ilgilenen arkadaşlara teşekkür ederim
YAPILAN TOPLAM POZ M adlı metin kutusunun veri kaynağını tablodan ilgili alanla eşleştirin daha sonra Ben formunuzun Current olayına aşağıdaki kodu yazdım siz dilediğiniz yere uygulayınız.Kolay gelsin...
Kod:
Private Sub Form_Current()
Me.[YAPILAN_TOPLAM_POZ_M] = DSum("[GÜNLÜKPOZ]", "Tablo1", "[PZN]=Forms![YOL YENİLEMELERİ]![BÖLGE]")
End Sub
Birde yapılmamsı gereken hatalar konusunu okuyunuz bence ilerde zahmet çekmeyiniz.
Sayın simendifer;
İstediğiniz ekte yapılmıştır.
Ancak yapılmaması gereken ölümcül hatalar konusunu okuyunuz. Siz tecrübeli bir kullanıcısınız alan adlarında türkçe karakter ve boşluk kullanmayın...
Kolay gelsin...
sayın Puletin ilginiz için teşekkür ederim kod yazmayı bilemdiğim için vermiş oldugunuz kodu formun gecerli oldugunda olay yordamına yazdım formu actıgımda bu nesneye deger atayamasınz diye bir uyarı alıyorum siz
YAPILAN TOPLAM POZ M adlı metin kutusunun veri kaynağını tablodan ilgili alanla eşleştirin
demişsiniz nasıl eşleştirecem bilemedim acıklarmısınz size zahmet ne yazmam gerekir acıklarmısınz tekrar teşekkür ederim
allaah razı olsun Kur@l
kardeşim çok teşekkür ederim ellerin dert görmesin uyarılarda çok haklısınız bu programa TCDD ankara bölge müdürlüğünün yol dairesinde görevli müdürümüzün
Excel verisini al komutuyla accesse adepte ettim form sorgu bundan yola cıkarak yaptım kısa bir zaman diliminde onun için alan adları uzun ve alt tire kullanamadım emeginize elinize saglık tekrar allah razı olsun sizlerde olmassanız biz kendimizi nasıl geliştirecegiz teşekkürler uyarıları dikkate alacagım
şimdi bu olayı nasıl yaptınız onu bulmam lazım
konu çözüme kavuştu herkese teşekkür ederim
bu kodu yazmışsınız
Private Sub Form_Current()
Me.YAPILAN_TOPLAM_POZ_M.Value =
Dsum ("[GÜNLÜKPOZ]", "tablo1", "[pzn]= " & Me.Kimlik)
End Sub
sayın puletinde bu kodu yazmıtı ama onunki hata verdi
Private Sub Form_Current()
Me.[YAPILAN_TOPLAM_POZ_M] =
Dsum ("[GÜNLÜKPOZ]", "Tablo1", "[PZN]=Forms![YOL YENİLEMELERİ]![BÖLGE]")
End Sub
bu tip olayda kullanılacak kod sayın Kur@l kodu dur arkadaşlar
Bu güzel çalışmaya ilişkin emek ve katkı için sayın simendifer ve Kur@al'a teşekkürler..