PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 25 → SQLConnect com PostgresSQL
SQLConnect com PostgresSQL
Iniciado por Antonio Carlos Coutinho, fev., 21 2018 2:31 PM - Sem resposta
#1
Publicado em fevereiro, 21 2018 - 2:31 PM
Exemplo de uso do PostgresSQL









Server Port=5433;

-----
// compara a data do servidor com a data da máquina
sIp is string = BuscaConfigValor("IP") //adriano
sUser is string = BuscaConfigValor("User") //adriano
sPass is string = BuscaConfigValor("Pass") //adriano
sPort is string = BuscaConfigValor("Port") //adriano


IF SQLConnect(sIp,sUser,sPass,"","OLEDB",hNativeAccessPostgreSQL,sPort) > 0 THEN //adriano
SQLExec("SELECT CURRENT_DATE","QseData")
IF SQLFetch("QseData")=0 THEN
DtServer is Date = SQLGetCol("QseData",1)
IF DtServer<>DateSys() THEN
Info("A data de seu computador está errada, favor corrigir !")
EndProgram()
END
END
END



----------
Em Close Window - Coloca para evitar travado o projeto sem ter que cancelar a tarefa pelo gerenciador do windows
----------

SQLDisconnect() //adriano

EndProgram() //adriano
→ Voltar para WINDEV 25