Man, you are really confused about these object works. You didn't perform a query against that database at all. All you did was create a blank recordset, add some columns to it, then bound the empty recordset to a datagrid. You need to actually execute a query against the database. Something like this will return all the records in the specified table:
Dim rs As New ADODB.Recordset
Dim conn As New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & \_
"C:\\Program Files\\Testing\\v003\\databases\\db1.mdb;Persist Security Info=False"
rs.CursorLocation = adUseClient
rs.Open "_tableName", conn, adOpenStatic, adLockReadOnly, adCmdTable
Set DataGrid1.DataSource = rs_
This probably won't run as listed. I haven't used VB6 in over 5 years now... RageInTheMachine9532 "...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome