[VB6] Verbindung zu Access Datenbank

[speedfreak1988]

Servus!

Ich versuche per VB6 eine Verbindung zu einer AccessDB zu bekommen. In der DB (Name: "Autovermietung.mdb") sind 3 Tabellen, jedoch reichts mir schon zu einer eine Verbindung zu bekommen, der Rest is dann ja Schema F.

Ich hab das vor Monaten mal mit SQL im VBA gemacht.
Aber wie war das nochmal? Irgendwas mit ADODB, Connections und Recordsets.

Das is mein bisheriger Code (auch teilweise ausm Netz:

Private Sub Command1_Click()
Dim RS As ADODB.Recordset
Set RS = New ADODB.Recordset
Dim Conn As ADODB.Connection
Dim SQL As String

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "Autovermietung.mdb", "", "", -1
RS.Open "SELECT * FROM fahrer", adOpenStatic, adLockPessimistic, -1
Do While Not RS.EOF
MsgBox RS.Fields("name")
RS.MoveNext
Loop

RS.Close
Conn.Close

THX für eure Tipps!

 

[fliegenkiller]

hast du hast sicher access? wenn ja dann erstelle eine DataAccessPage in der Datenbank. und dort ist alles ganz genau erklärt.

so viel ich weiss, kannst du mit einem ConnectionObjekt die OpenRecordset('Name/SQL', type) die Tabelle / Recordset/ Abfrage öffnen.

und dann mit den Unktionen moveNext() moveLast etc. im Recordset 'umherlaufen'.