ayuda con visual basic 6

[tazzito]

uff tiempo que no veo eso, desde mis comienzos y la integracion de vb 5 con los progamas en clipper, segun recuerdo era asi con dao

dim carpeta as database
dim Base as recordset
set carpeta = opendatabase("c:\",false,,"DBase IV;")
set Base = Carpeta.Openrecordset("Archivo.DBF")


y en ADO es

dim Path as string, cnDos as ADODB.Connection, rst As ADODB.Recordset
Path = "C:\"
With cnDos
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source = " & Path
.Properties("Extended Properties") = "dBASE IV;"
.Open
End With

Set rst = New ADODB.Recordset
With rst
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open "Archivo.dbf", cnDos, , , adCmdTable
End With

yo usaba dao en ado nunca lo use pero prueba y nos comentas.