Necesito un ejemplo

zepi
04 de Diciembre del 2003
necesito un ejemplo de conexion remota, sabiendo que la base de datos esta en VFoxpro, qué sentencias debo añadir en el caso que se quiera añadir registros y a la vez otro usuario esta usando la misma tabla.

Conexion
04 de Diciembre del 2003
Desafortunadamente No tengo el autor de este codigo.
Conexion ODBC directamente desde VFP

DECLARE Integer SQLConfigDataSource IN odbccp32.dll;
Integer, Short, String @, String @

ODBC_ADD_SYS_DSN = 1

lc_driver = "Microsoft Visual FoxPro Driver" + CHR(0)
lc_dsn = "dsn=Bases Bodega1" + CHR(0) + "BackgroundFetch=Yes" + CHR(0) +;
"Description=descripcion de la conexion" + CHR(0) + "Exclusive=No" + CHR(0)+;
"SourceDb=uta.dbc" + CHR(0) + "Sourcetype=DBC"

IF SQLConfigDataSource(0, ODBC_ADD_SYS_DSN, @lc_driver, @lc_dsn) = 1
RETURN .T. && OK
ENDIF
RETURN .F. && error


*.- lc_driver = Drive de Visual FoxPro
*.- lc_dsn = dsn = Nombre de la Conexion
*.- BackgroudFetch = Busqueda de datos secundarios Valores Yes o No
*.- Description = Descripcion de de la conexion
*.- SourceDb = Mapeo o direccion de la tabla o base de datos a conectar
*.- SourceType = tipo de conexion valores DBC o DBF si fuera tabla libre