Programmieren - alles kontrollieren 4.934 Themen, 20.613 Beiträge

Access zugrifft über VB6

logo_2 / 1 Antworten / Flachansicht Nickles

hier ein auszug meines programmes, dabei bekommen ich fehlern aber ich möchte dass in nen textbox den ersten Eintrag.


müsste so was heissen wie


feld.textbox=rs.movefirst


dabei bekomme ich ne Fehlermeldung Funktion oder Variable erwartet


kann mir jemand dabei helfen???


danke


 


Option Explicit
Dim Cn As New ADODB.Connection


Private Sub Form_Load()
    With Cn
   
        .CursorLocation = adUseClient


        .Mode = adModeShareDenyNone


    ' DB-Provider (Access 2000)
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .ConnectionString = "Data Source=d:\test.mdb"
        .Open
    End With
   
    Dim Rs As New ADODB.Recordset


With Rs
    .CursorType = adOpenKeyset
    .LockType = adLockPessimistic
    .Open "SELECT Name FROM gruppe", Cn
   
End With
   
End Sub

bei Antwort benachrichtigen