Como conectar con postgres desde visualfox 9.0
Estimados solicito ayuda para leer información de una base postgres.
1) Mi sistema operativo es Windows Seven de 64 bit
2) Utilizo Visual fox 9.0
Intento la conexión utilizando un string connection pero quizás me falta algo,¿quizás sea sobre el ODBC?
lcRutaServer="192.168.1.195"
lcBaseDatos="Tramas"
lcUser="mistery"
lcPasword="mistery57"
lcConC = "Driver={PostgreSQL30}; SERVER=&lcRutaServer; DATABASE=&lcBaseDatos; UID=&lcUser;PWD=&lcPasword;"
miErrorTry = .F.
TRY
STORE SQLSTRINGCONNECT(lcConC,.T.) TO ConPostGresql
CATCH
miErrorTry = .T.
ENDTRY
*!* *** Verifica si existe un error en la conexión
IF miErrorTry THEN
MESSAGEBOX(‘Ocurrio un error en la conexion a POSTGRESQL’)
RETURN
ENDIF
*!* *** Verifica si existe un error en la conexión
IF ConPostGresql <= 0
lError=AERROR(Mi_Error)
MESSAGEBOX(Mi_error(1,3),0+64)
RETURN .F.
ENDIF
MESSAGEBOX(‘Conexión a Postgresql realizada’)
