ADO y CLIPPER

"Franci" preguntó:

¿alguien sabe cómo puedo realizar una conexión a base de
datos Clipper con ADO?

Hola, Franci:

Nunca he programado en Clipper, pero tengo entendido que las bases de datos
son archivos dBASE. Si no estoy equivocado, prueba a utilizar el ISAM de
dBASE del motor Microsoft Jet. El siguiente ejemplo, abrirá un supuesto
archivo de «Clientes.dbf» versión dBASE III:

' Declaramos variables objeto
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset

' Establecemos la conexión con el archivo dBASE
' especificando, solamente, la carpeta donde se
' encuentra
Set cnn = New ADODB.Connection
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "C:\Mis documentos"

' Puedes utilizar también «dBASE IV;» y «dBASE 5.0;»,
' dependiendo de la versión del archivo
.Properties("Extended Properties") = "dBASE III;"

' Abrimos la conexión
.Open
End With

' Creamos un nuevo objeto «Recordset» para abrir el
' archivo dBASE
Set rst = New ADODB.Recordset
With rst
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open "Clientes.dbf", cnn, , , adCmdTable
End With

Si quieres ver los datos en un control «DataGrid», coloca dicho control en
un formulario y ejecuta la siguiente sentencia:

Set DataGrid1.DataSource = rst

Ya tienes abierto el archivo dBASE donde podrás añadir, modificar y eliminar
los registros.

En cuanto a los campo tipo MEMO, asegúrate que los archivos DBT estén en la
misma carpeta que los archivos de base de datos DBF.

Un saludo.

Enrique Martínez
[MS MVP - VB]

También puedes usar el controlador ODBC para FoxPro:
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset

Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=MSDASQL.1;Persist Security
Info=False;Data Source=FoxPro Files - Word;
SourceDB=e:\victor\c52\source\trabajo\palm"
' SourceDB es la carpeta donde están las tablas(DBF) que quieres abrir...
cn.Open
Set rs = New ADODB.Recordset
rs.Open "select * from miTablaDbf", cn, adOpenKeyset,
adLockBatchOptimistic

Saludos

"Franci" escribió en el mensaje
news:

Hola Grupo,
¿alguien sabe cómo puedo realizar una conexión a base de datos Clipper
con ADO?

Muchas gracias de antemano

________________
Franci Guerrero

Hola Franci.
Mira en Able Consulting la cadena de conexión a dBase III
http://tinyurl.com/crqz
Ojo, que ADO 2.6 ya no trae los componentes de escritorio (Jet, dBase, etc...)
y tienes que bajarlos aparte.

Salu2.
José Mª Fueyo [MS-MVP Access]

¡¡Se está preparando el III Encuentro de Sufridores de Access!! ¡¡Y ya está
cerca...!!

http://www.mcpegasus.com/encuentros...uentro.htm