21/01/2008, 13:36
|
| | | Fecha de Ingreso: enero-2008
Mensajes: 1
Antigüedad: 17 años, 2 meses Puntos: 0 | |
| Re: leer una tabla .dbf de vfoxpro 6.0 con visual basic 6.0
Prueba con este codigo
cnVFP.CursorLocation = adUseClient
ruta = "D:\BASES\PRIN"
cnVFP.Open "Driver={Microsoft Visual FoxPro Driver};" & _
"SourceType=DBF;" & _
"SourceDB=" & ruta & ";" & _
"Exclusive=no;"
'donde "ruta" es la ruta donde se encuentran los DBF's
'Para Leer los dfbs. a un Recordset
Set rsVFP = cnVFP.Execute ("select * from rn0001 where contrib = '0000000022'")
rsVFP.MoveFirst
Print rsVFP.Fields("nomb")
espero te sirva |