FoxPro/Visual FoxPro - Conexion Oralce 11g con Fox

Esto te puede ayudar,

**************** Conexion fox con Oracle 11g*********************

vCnx = SQLSTRINGCONNECT("DRIVER={Oracle en OraDb11g_tu-home1};UID=tu-usuario;PWD=tu-passwors;DBQ=tu-tns_si deseas;BA=W;")
IF vCnx < 0 THEN
AERROR(mierror)
MESSAGEBOX('No se pudo realizar la conexión al '+ CHR(13)+;
mierror(2), 16, 'Error de conexión con Oracle 11g')
cancel
else
messagebox('ok')
ENDIF

****************************** fin **********************************

**************** Desconexion fox con Oracle 11g*********************
if vCnx >= 0
sqldisconnect(vCnx)
endif
=messagebox('Desconexion realizada con exito')
************************** fin **********************************