you use it just like in vb.
create an adodb.connection and an adodb.recordset, then connect to the db and load what you want:
Dim CN
Dim RS
Set CN = CreateObject("ADODB.Connection")
Set RS = CreateObject("ADODB.RecordSet")
CN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data source=[FILENAME]" ' Replace [FILENAME] with your file name (path and all)
RS.CursorLocation = 3
RS.Open "SELECT * FROM [TABLENAME]",CN ' replace [TABLENAME] with the table name
do while RS.EOF = false
[MYVARIABLE] = RS("[FIELDNAME]") ' replace [MYVARIABLE] with your variable and [FIELDNAME] with your field name
RS.MoveNext
Loop
RS.Close
CN.Close
Set CN = nothing
Set RS = nothing
enjoy
Chi
"They mostly come at night...mostly"