+- 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ığı: Forma Kayıt Getirilmesi (/konu-forma-kayit-getirilmesi.html)
Forma Kayıtların getirilmesi - sadikkavakli - 07/07/2011
Değerli Üstadlarım,
Form2 de ve Form1 listbox daki kayıtları seçilince forma getirilmesi
arama yaptıktan sonra çift tıklama ile o kayıtların getirilmesi talep ediyorum.
Yardımcı olursanız sevinirim.
Cvp: Forma Kayıtların getirilmesi - Coskun0559 - 07/07/2011
form2 deki liste kutusunun çift tıklanıldığında yordamına;
Private Sub Liste0_DblClick(Cancel As Integer)
acilacakForm = "form1"
hangiKriter = "[Kimlik]=" & Me![Liste0]
DoCmd.OpenForm acilacakForm, , , hangiKriter
DoCmd.Close acForm, "form2"
End SubCvp: Forma Kayıtların getirilmesi - Coskun0559 - 07/07/2011
form1 deki liste kutusunun çift tıklanıldığında yordamıda şu şekilde olacak;
Private Sub Liste133_DblClick(Cancel As Integer)
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Kimlik] = " & Str(Nz(Me![Liste133], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End SubCvp: Forma Kayıt Getirilmesi - Coskun0559 - 07/07/2011
Açmış olduğunuz 2 aynı konuyu birleştirdim.
Cvp: Forma Kayıt Getirilmesi - sadikkavakli - 07/07/2011
Sayın Coşkun Bey,
cevabınız için çok tşk ederim. Elinize sağlık.
Konun 2 kere açılması sayfa hatası verdiği içindir. Onun içinde ayrıca teşekür ederim.