ODBC & Access 2000

How do I open a ODBC file in a VB module in Access 2000? I am using the following:

Dim cnn1 As ADODB.Connection
Dim rst1 As ADODB.Recordset
Set cnn1 = New ADODB.Connection
Set rst1 = New ADODB.Recordset
cnn1.Open “DSN=GP;USERID=lincabc;PASSWORD=xxxxx;”
rst1.Open “LINC.PROPDB_CUST”, cnn1, adOpenDynamic, adLockReadOnly, adCmdTableDirect

I am unable to use any fields because BOF & Eof are true.