El 27 de enero de 2009 7:09, Patricio Castro <pmcast...@gmail.com> escribió:

> Buenos días Lista, yo tengo que emigrar una aplicación en vfp a postgresql
> y mi consulta es a los colegas que ya me llevan ventajas con VFP para
> conectase a postgre, ¿me pueden ayudar?
>
>
Básicamente con esto puedes hacer tus pruebas iniciales:

lcServidor = 'localhost'
lcPuerto = '5432'
lcBaseDatos = 'test'
usu = 'postgres'
pass = 'noselodigasanadie'

lcStr    = 'DRIVER={PostgreSQL Ansi};SERVER=' + lcServidor +;
              ';port=' + lcPuerto + ';DATABASE=' + ALLTRIM(lcBaseDatos) +;
              ';UID=' + usu +;
              ';PWD='+ pass +';'

gnConnHandle_temp  = SQLSTRINGCONNECT(lcStr,.F.)

if gnConnHandle_temp = -1
    AERROR(arrayerror)
    if arrayerror(4)='28000' then
        MESSAGEBOX('Usuario o contraseña incorrectos',16,':: Error en la
conexión ::')
    endif
else
    WAIT WINDOW "Conexion exitosa"
endif

Para ver la sintaxis de la cadena de conexión puedes consultar detalles aca:
http://www.connectionstrings.com/postgre-sql

Responder a