(24/09/2014, 13:43)akdemir1 yazdı: Merhaba sayın Berkt,

Belirttiğiniz hatalar bana göre referanslardan dolayı,
herhangi bir pencerede "veri tabanı araçları sonra visual basic" veya alt+F11 yaparak visual basic kod penceresine geçiniz,
Sonra Tols "araçlar" dan references "referanslar" kısmına tıklayınız açılan pencerede şunları tikleyip tamam diyiniz.
1.microsoft activex data objects 6.1 library (veya sizde görünen en son sürüm kitaplık)
2.microsoft activex data objects recordset 6.0 library

bu şekilde bi dener misiniz,

Saygılarımla..

Hocam cevabınız için teşekkürler. dediklerinizi yaptım ancak listeye tıklayınca

Private Sub CariListe_Click()
Call FormAcik
Call KilitGuncelle

Dim strSQL As String
strSQL = "SELECT * FROM kategori WHERE IDKategori =" & Me.CariListe & ""

Set rs = CreateObject("ADODB.Recordset")
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Open strSQL, CurrentProject.Connection
hatası geliyor şimdide. referanslardan ado ile ilgili sanırm. Ama benim anlamadığım olay. İlk yolladığım dosyanın içinde kodları aldığım örnek dosya var orada hepsi tıkır tıkır çalışıyor benimkine geldiğinde çalışmıyor. sadece isimlerini değiştirdim kodlarda değişiklik yapmadım hiç


İyi çalışmalar.