vb6novice,
To Create an ADO Connection to an Access DB there a many variations but a couple you can use are:-
Dim oConn As ADODB.Connection
'Instantiate Connection Object
Set oConn = New ADODB.Connection
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data source=C:\temp\db1.mdb"
OR/
Dim oConn As ADODB.Connection
'Instantiate Connection Object
Set oConn = New ADODB.Connection
'Set Connection Properties
With oConn
.Provider = "Microsoft.Jet.OLEDB.4.0"
'If there is a Password use the line below
'.Properties("Jet OLEDB

atabase Password"

= ""
.Mode = adModeReadWrite
.Open "Data source=C:\temp\db1.mdb"
End With
Now you have created the Connection Object you can create an ADO Recordset.
Dim oRec As ADODB.Recordset
'Instantiate ADO Recordset Object
Set oRec = New ADODB.Recordset
'Create Recordset
oRec.Open "SELECT * FROM TABLE1", oConn, 3, 3
Codefish