PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → 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?
Débuté par Boller, 12 oct. 2023 03:26 - 1 réponse
Membre enregistré
3 659 messages
Popularité : +175 (223 votes)
Posté le 12 octobre 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/
Membre enregistré
3 659 messages
Popularité : +175 (223 votes)
Posté le 13 février 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/