AccessTr.neT
Liste Kutusundan veri aktarma Soru - Baskı Önizleme

+- 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ığı: Liste Kutusundan veri aktarma Soru (/konu-liste-kutusundan-veri-aktarma-soru.html)



Liste Kutusundan veri aktarma Soru - ozguryasin - 02/09/2012

Göndermiş olduğum örnekte Liste1 kutusuna tıklandığında hangi kaydın üstüne tıklanırsa metin kutularına o verileri atmasını amaçladım fakat. her seferinde birinci kaydı atıyor.
nerede yanlış yaptığımı hala bulamadım.
siz değerli www.accesstr.net ailesinden yardım bekliyorum.


Cvp: Liste Kutusundan veri aktarma Soru - ozguryasin - 03/09/2012

Uğraşlarım sonucunda çözümü buldum, tekrar soruma ben cevap vereyim Img-grin
tek sorun kendime +rep verememem Img-cray
Private Sub Liste1_Click() olayının kodunu alttaki kod ile değiştirmek yeterli olacaktır.
 Dim strSQL As String
strSQL = "SELECT * FROM kasa_harcama WHERE harcama_no ='" & Me.Liste1 & "'"

Set rs = CreateObject("ADODB.Recordset")
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Open strSQL, CurrentProject.Connection

If Not rs.BOF Then
Me.harcama_no = rs("harcama_no")
Me.harcama_adi = rs("harcama_Adi")

End If
rs.Close
Set rs = Nothing



Cvp: Liste Kutusundan veri aktarma Soru - benremix - 03/09/2012

(03/09/2012, 01:28)ozguryasin yazdı: Uğraşlarım sonucunda çözümü buldum, tekrar soruma ben cevap vereyim Img-grin
tek sorun kendime +rep verememem Img-cray

Sen veremezsen biz veririz.HalayHalayHalay
+rep
Sayglar...


Cvp: Liste Kutusundan veri aktarma Soru - ozguryasin - 03/09/2012

(03/09/2012, 05:40)benremix yazdı: Sen veremezsen biz veririz.HalayHalayHalay
+rep
Sayglar...

Teşekkürler Hocam Img-grin