Conectarme a archivos .DBF y manipularlos con Recordset's

[fx700]

Tengo una aplicion en visual Foxpro 9 con DB en archivos .DBF y tengo que agregar un par de formularios con funciones especificas y algunos reportes y quisiera hacerlo con vb6.0 ya de Foxpro no se nada, osea que sera una aplicacion aparte.

No he logrado de ninguna manera conectarme a los archivos .DBF y menos utilizar los recordset's, algun ejemplo de conexion?

[cladafuri]

Private Sub Form_Load()
Data1.Connect = "dBASE 5.0;"                                     'CONEXXION A DBF
Data1.DatabaseName = "C:\REMU\DAEM\SEP2009"    'RUTA DE LA BD DE DBF
Data1.RecordSource = "LREM"                                     'NOMBRE DE LA BD DBF
End Sub

[fx700]

Hola no me funciono, dice al igual que varios ejemplos que he descargado "No se encontro el ISAM instalable".

Solo he instaldo el OLEDB ya que el ODBC driver no instala parece que el de la pagina de microsoft esta dañado.

Si alguien tiene por ahi un ejemplo se lo agradere, saludos

[wolf_kof]

postea una base de datos DBF para que podamos analizarla, a veces es necesario encontrar los driver del odbc por ahi para que sea compatible la lectura.

[fx700]

Ahi dejo uno de los archivos DBF a los cuales quiero accederhttp://www.megaupload.com/?d=3OAT5Q8Q para que lo analizes.

Segun la web del guille solo se necesita el ODBC driver fox pro pero este esta dañado o algo por estilo, lo he bajo varias veces y nunca puedo instalarlo.
http://www.elguille.info/net/ADONET/acceso_ficheros_dbase_vbnet_csharp.aspx

He logrado conectarme, pero no aparece ningun registro, solo las cabeceras es decir el nombre de los campos , pero si utilizo otros archivos DBF que encontre en internet si esta todo ok, aqui los dejo http://www.megaupload.com/?d=GPXMC2KY

Código: [Seleccionar]

Dim cn As Connection
Dim rs As Recordset

Private Sub Form_Load()

Set cn = New Connection
cn.ConnectionString = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;sourceDB=C:\carpeta"

cn.CursorLocation = adUseClient
cn.Open
Set rs = New Recordset
rs.Open "select * from llantas", cn, adOpenStatic

Set DataGrid1.DataSource = rs

End Sub



saludos

[fx700]

Finalmente y con mas calma he logrado solucionar el problema utilizando correctamente el OLDB que instale, gracias al comentario de Wolf_kot.
Aqui la cadena de conexion correcta segun mi criterio por que leyo todos los ficheros(lo de fox pro9 y los otros DBF que encotre en internet)

Código: [Seleccionar]

Provider=vfpoledb;Data Source=C:\MyDataDirectory\;Collating Sequence=general;
Fuente:
http://connectionstrings.com/visual-foxpro

Saludos

[wolf_kof]

es wolf_kof  , pero me alegra que allas encontrado la respuesta por ti solo,  .