Visual Basic - conexion dbf con ADO

hola
Como hago lo conexion a dbf a traves de ADO??

tengo lo siguiente...

SET dbDBF = New Connection
dbDBF.Open "....."

que es lo que debo poner??
ademas, tengo creado un archivo DSN que me hace la conexion a traves de ODBC.
tengo que agregar algo en la conexion??

gracias y disculpen las molestias...
saludos
Aldo

Prueba en este link.... ojalá y te sirva de algo

http://www.connectionstrings.com/

Suerte...!!

me quiero conectar a tablas de DBF con ADO no puedo.
probe con estas conexiones y no anduvo...

conexion 1:

Set dbDBF = New Connection
dbDBF.Open "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=c:\user2\afilia;"

conexion 2:
dbDBF.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\user2\afilia;Extended Properties=dBASE IV;"

con ninguna de estas dos pude...
me salio el siguiente error:

"Error 30006: No se puede asignar memoria para Flex Grid"

por favor, alguien que me ayude!
gracias
Aldo

y al conestar te dio ese error? y de donde coños salio el Flex Frid? yo no lo vi.

tengo un formulario con un boton que supone que tiene que hacer una busqueda en la "DICHOSA" tabla DBF que me quiero conectar.
cuando le doy click a ese boton de busqueda, me tiene que traer en el FLEX GRID (la grilla), la consulta en SQL que hago para mostrarme los registros que pido.
Pero me da la sensacion que la conexion no es compatible con lo que pido...
te muestro...

el modulo bas tengo la siguiente linea...

Global dbDBF As New Connection

luego el siguiente sub...

Sub AbrirBaseDBF()
Set dbDBF = New Connection
dbDBF.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\user2\afilia;Extended Properties=dBASE IV;"
Exit Sub
End Sub

luego de llamar al sub AbrirBaseDBF, tengo las siguientes lineas en un formulario con un boton llamado cmdBuscar que pretende hacer la busqueda en la tabla afilia.DBF. (a su vez, este formulario llama a otro formulario llamado frmBuscar3C que es donde esta el FLEX GRID y ahi me tira el error)

Option Explicit
Dim rs As ADODB.Recordset

Private Sub cmdBuscar_Click()
On Error GoTo errHandler
frmBuscar3C.Show vbModal
If Len(frmBuscar3C.Codigo1) > 0 Then
txtCarnet.Text = frmBuscar3C.Codigo1
txtNiv.Text = frmBuscar3C.Codigo2
txtApenom.Text = frmBuscar3C.Nombre
Else
txtCarnet.Text = ""
txtNiv.Text = ""
txtApenom.Text = ""
End If
Exit Sub
errHandler:
MsgBox "Error : " & Err.Number & ". " & Err.Description, vbInformation, "Atención"
Exit Sub
Resume
End Sub

SI NO SE ENTENDIO, PIDO DISCULPAS...
desde ya muchas gracias!
Aldo

Al parecer ya pudiste abrir el archivo DBF, el problema ahora es cuando tratas de vaciar el contenido en una grilla (MsFlexGrid), deberías averiguar muy bien en qué línea de tira ese error, buscar información sobre el mismo para que puedas corregirlo, ya en su caso, te recomendaría cambiar de control.... el datagrid o dbgrid.

Desconozco completamente si dentro de las características del MsFlexGrid sea la de mostrar registros de archivos con formato DBF, eso si no lo se...

Suerte

Te agradezco mucho Ivan...
voy a investigar lo que me escribiste

saludos
Aldo