josuefema
17 de Diciembre del 2003

Hola amigos mi nombre es Josu茅, y agradeceria mucho si alguien me podria enviar ejemplos peque帽os sobre como enlazar V.Foxpro com el SQL. bueno recien estoy viendo esta parte.
Gracias

Luis Asca?
17 de Diciembre del 2003

Si claro, lo primero que tienes que hacer es configurar un ODBC(nombre del ODBC, descripci贸n, servidor, usuario,contrase帽a y la base de datos) en el panel de control (herramientas administrativas) de tu sistema.

Acto seguido, podras realizar la conecci贸n con el siguiente c贸digo:

Note Realizamos la conecci贸n
liHandle = SQLCONNECT('Mi_ODBC_SQLServer','usuario','contrase帽a')
liResult = SQLEXEC(liHandle, "exec sp_setapprole 'usuario', 'contrase帽a'")
IF liResult < 0
*/ si logramos la conecci贸n, procedemos hacer la consulta
SQLEXEC(liHandle, 'select * from tabla')
brow noed
*/ Si deseas traer una copia de tu consulta lo puedes conseguir as铆...copy to tabla
ELSE
messagebox("Error en la conecci贸n,Conecci贸n")
ENDIF

SQLDISCONNECT(liHandle)
wait wind "Conecci贸n lograda" nowait
close all
return

No olvidar que Mi_ODBC_SQLServer es el nombre que que creaste en tu ODBC

Saludos.