lcserver="localhost"
lcdatabase="db"
lcuser="user"
lcpassword="pass"
lcport="5432"
lcstringConn="Provider=MSDASQL;Driver={PostgreSQL ODBC Driver(UNICODE)}; Server="+lcserver+";Port="+lcport+";Database="+lcdatabase+";uid="+lcuser+";pwd="+lcpassword+";UseServerSidePrepare=1;MaxVarcharSize=254;UnknownsAsLongVarchar=0;TextAsLongVarchar=0;"
SQLSETPROP(0, "Displogin", 3)
nconn=SQLSTRINGCONNECT(lcstringConn)
IF nconn>0 THEN
MESSAGEBOX('conectado...')
ELSE
=AERROR(laError)
cError='A '+laError(1,3)
MESSAGEBOX(cError)
ENDIF
importente :
revisa que el nombre del driver ODBC este registrado de esta manera : PostgreSQL ODBC Driver(UNICODE)
salds y suerte
Mapasac.....