Crear instalador Sistema cliente servidor Fox 9
Publicado por Wily (4 intervenciones) el 04/12/2008 14:03:03
Buenas..
Mi pregunta es como hago para crear un instalador de uns sistema echo en fox 9 para que corra en otra maquina que no sea el servidor..
Utilizo Fox9 con base de datos firebird 1.5.2 y varios ocx, vcx en el programa.
Esta es la forma en que me conecto al servidor. Prg
***************************************************
** PROCEDURE CONECTAR
***************************************************
lcDriver = "{Firebird/InterBase(r) driver}"
lcUid = "SYSDBA"
lcPwd = "masterkey"
smqu = '127.0.0.1'
lcFbd = 'SGIM'
lcDsnString = [DRIVER=] + lcDriver + ;
[;UID=] + lcUid + ;
[;PWD=] + lcPwd + ;
[;server=] + smqu + ;
[;DBNAME=] + lcFbd
strSQL = lcDsnString
WAIT WINDOW 'Conectando... Espere' Nowait
Sgim = SQLSTRINGCONNECT(lcDsnString)
IF sgim < 0
MESSAGEBOX('CONEXION PERDIDA',16,'INFORMACION FIREBIRD')
ELSE
MESSAGEBOX('CONEXION EXITOSA',48,'INFORMACION FIREBIRD')
=SQLSETPROP(sgim,"Transactions",2)
ENDIF
Cuales son los dll que tengo que copiar con el sistema o llevar para que pueda correr en el cliete..
Saludos
Mi pregunta es como hago para crear un instalador de uns sistema echo en fox 9 para que corra en otra maquina que no sea el servidor..
Utilizo Fox9 con base de datos firebird 1.5.2 y varios ocx, vcx en el programa.
Esta es la forma en que me conecto al servidor. Prg
***************************************************
** PROCEDURE CONECTAR
***************************************************
lcDriver = "{Firebird/InterBase(r) driver}"
lcUid = "SYSDBA"
lcPwd = "masterkey"
smqu = '127.0.0.1'
lcFbd = 'SGIM'
lcDsnString = [DRIVER=] + lcDriver + ;
[;UID=] + lcUid + ;
[;PWD=] + lcPwd + ;
[;server=] + smqu + ;
[;DBNAME=] + lcFbd
strSQL = lcDsnString
WAIT WINDOW 'Conectando... Espere' Nowait
Sgim = SQLSTRINGCONNECT(lcDsnString)
IF sgim < 0
MESSAGEBOX('CONEXION PERDIDA',16,'INFORMACION FIREBIRD')
ELSE
MESSAGEBOX('CONEXION EXITOSA',48,'INFORMACION FIREBIRD')
=SQLSETPROP(sgim,"Transactions",2)
ENDIF
Cuales son los dll que tengo que copiar con el sistema o llevar para que pueda correr en el cliete..
Saludos
Valora esta pregunta
0