|
| Inicio → WINDEV 25 → Como direcionar pra usar um banco se for compilar com F9 ou deploy de produção? |
| Como direcionar pra usar um banco se for compilar com F9 ou deploy de produção? |
| Iniciado por Boller, 12,oct. 2023 03:26 - 2 respuestas |
| |
| | | |
|
| |
Miembro registrado
4.521 mensajes |
|
| Publicado el 12,octubre 2023 - 03:26 |
gbconexao is boolean = False
gsUsuario, gsPerfil are string
gsServer, gsUser, gsPass, gsBase is string
HOnError("*",hErrAll, "OnOtherError")
IF InTestMode() =True //F9 TESTE
gsServer = "sql server2014" //NoSpace(INIRead("conexion","servidor", "", sArchivoini))
gsUser = "andre" //NoSpace(INIRead("conexion","usuario", "", sArchivoini))
gsPass = "vencom123456/*-"//NoSpace(INIRead("conexion","clave", "", sArchivoini))
gsBase = "dbgira" //NoSpace(INIRead("conexion","basededatos", "", sArchivoini))
ELSE
gsServer = "hfsql.wxlocal.com:4901"
gsUser = "andre"
gsPass = "@sndre$123456@"
gsBase = "dbgira"
END
ConHFSQLCS is Connection
// Parameters of the connection
ConHFSQLCS..Server = gsServer
ConHFSQLCS..User = gsUser
ConHFSQLCS..Password = gsPass
ConHFSQLCS..Database = gsBase
ConHFSQLCS..Provider = hAccessHFClientServer
ConHFSQLCS..Access = hOReadWrite
ConHFSQLCS..ExtendedInfo = "Extended information"
ConHFSQLCS..CursorOptions = hClientCursor
ConHFSQLCS..
Info(gsServer, gsUser,gsPass,gsBase)
// Opening the connection
IF HOpenConnection(ConHFSQLCS) THEN
IF HChangeConnection("*",ConHFSQLCS) = True THEN
gbconexao = True
END
ELSE
Error("Sem acesso: "+CR+HErrorInfo())
END
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
4.521 mensajes |
|
| Publicado el 13,febrero 2024 - 12:55 |
Explicação
Se da F9 (GO) na máquina roda a base teste vai pelo IF
Se compila faz deploy gera o exe ou sobe o site ou gera o apk Mobile daí vai pelo ELSE vai pela base de produção
Crie uma rotina no servidor, um exe, e use os comandos Descritos
Hmodifystructure (“*”)
Hcreationifnotfound (“*”)
Hopenconnection (minha conexao)
Hchangeconnection(“*”,minhaconexao)
Pense também a seguinte situação, imagine se todo app que acessar o banco executar essa rotina vai dar problema e lentidão, faça um exe pra atualizar a estrutura no servidor.
tenho um cliente aqui que está fechando o app de ponto para 1500 colaboradores imagina 1500 chamadas de hmodifystructure quando precisar a tualizar o banco de ados...
Pense em tudo, não só em comandos, mas quando e como eles serão aplicados
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
4.521 mensajes |
|
| Publicado el 11,julio 2024 - 02:34 |
//Exmplo de garantia de conexao e disponibilidade
If ping(“200.38.56.1”,5s) =True
//Deu certo log ok
If Hopenconnection=True
If Hchangeconnection=True
Executa aqui teu código
Else
//log erro
End
Else
//log erro
End
Else//Ping
//Bug log
Log.evento= “consumo de dados”
Log.datahora=datesys()+Timesys()
Log.descricao=herrorInfo() +cr+errorinfo()
Hadd(log)
End
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | | | |
| | |
|