kodlarım aşağıdaki gibi.. Form açılıyor ders adını kodunu yazıyorum ekle diyorum eklemiyor.. Sonra tekrar yazıyorum bu sefer ekle dediğimde ekliyor.. Nerede hata yapıyorum acaba?
Not: Visual Basic 6.0 kullanıyorum
Alıntı
Dim conn As New ADODB.Connection
Dim rec As New ADODB.Recordset
Private Sub Command1_Click()
Set txtDERS.DataSource = rec
txtDERS.DataField = "DERS"
Set txtKOD.DataSource = rec
txtKOD.DataField = "KOD"
rec.AddNew
End Sub
Private Sub Form_Load()
conn.Open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = DersTakip.mdb"
rec.CursorLocation = adUseClient
rec.Open "Select * From VERILER", conn, adOpenDynamic, adLockOptimistic
End Sub
Kimlik doğrulama veya yönetimden onay bekliyor.Veritabanı bağlantısını açmıyor olabilir. Butonun ilk satırında açmayı denersen çalışır sanırım.