+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Verilerin Otomatik Olarak Gelmesi (/konu-verilerin-otomatik-olarak-gelmesi.html)
Verilerin Otomatik Olarak Gelmesi - konak - 05/10/2015
Merhaba,
Benim şöyle bir sorunum var.Ekte yollayacağım programda MUSTERIKOD1 adlı formda No'yu seçtiğimde diğer sekmelerin otomatik olarak gelmesini sağlayamıyorum.Bu kod bana her yaptığım programda aksilik çıkarıyor.Yardımlarınızı bekliyorum.
Cvp: Verilerin Otomatik Olarak Gelmesi - simendifer - 05/10/2015
MUSTERIKOD1 adlı formda isteginiz yapılmıştır inceleyiniz
formu oluşturduktan sonra açılan kutu ekleyin açılan kutu sihirbazı size yol gösterecektir
Cvp: Verilerin Otomatik Olarak Gelmesi - konak - 05/10/2015
Çok teşekkür ederim bunu ben de böyle yaptım fakat öyle değil üzerinde değişim de yapılabilecek bir şey lazım.Biliyorum karışık ama mesela no dan 1 i seçtiğimde diğerleri de alt alta başka satırda o 1 in karşılığındaki satırların gelmesi gerekiyor ve gerekirse üzerinde değişim yapılması gerekiyor.İşte ben onu beceremiyorum.Yani her sekmenin otomatik olarak gelmesi gerekiyor.
Yardımlarınız için çok teşekkür ederim.
Cvp: Verilerin Otomatik Olarak Gelmesi - simendifer - 05/10/2015
eklediğiniz açılan kutu nun olay yordamında güncelleştirme sonrasına ekteki kodu yazmalısınz
Private Sub Açılan_Kutu11_AfterUpdate()
' Denetime uyan kaydı bul.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NO] = " & Str(Nz(Me![Açılan_Kutu11], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
Cvp: Verilerin Otomatik Olarak Gelmesi - konak - 05/10/2015
bunu no yazdığım yere mi yazacağım acaba?
Cvp: Verilerin Otomatik Olarak Gelmesi - simendifer - 05/10/2015
ekteki resimleri inceleyiniz