FoxPro/Visual FoxPro - conectar a sql

   
Vista:

conectar a sql

Publicado por luis (1 intervención) el 13/12/2010 00:30:45
tengo un dll que me retorna el numero de conexion a sql
DEFINE CLASS p_screen AS CUSTOM OLEPUBLIC
Name = "p_screen"
PROCEDURE conectar
nombre_servidor = 'server'
nombre_base_datos = 'midata'
nombre_usuario = 'miloginsql'
clave_usuario = 'miclavesql'

conectar="Driver={SQL Server};";
+"Server="+nombre_servidor+";";
+"Database="+nombre_base_datos+";";
+"uid="+nombre_usuario+";"+"pwd="+clave_usuario+"; "
nu_conexion=sqlstringconnect(conectar)
RETURN nu_conexion
endproc
ENDDEFINE

en otro programa tengo este otro codigo :
oPScreen = CREATEOBJECT('olepscrn.p_screen')
CNT_ = oPScreen.conectar
cuando ejecuto esta linea sale error la conexion es invalida
SQLEXEC(CNT_, 'SELECT TOP 8 * FROM DOCU2000', 'mitabla')
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder