PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV 25 → [WM-20] Alterar Estrutura SQLite (Android) Manualmente
[WM-20] Alterar Estrutura SQLite (Android) Manualmente
Débuté par Willian Fernando, 17 mai 2015 01:06 - Aucune réponse
#1
Membre enregistré
123 messages
Popularité : +46 (46 votes)
Posté le 17 mai 2015 - 01:06
Quando se tem uma APP especifica, ou sobre pedido, ocorre que muitas vezes deve-se adicionar, ou modificar algo na estrutura do SQLite Localmente no dispositivo y muitas vezes não podemos simplesmente borrar o arquivo y criar de 0 já que pode-se ter dados ou o dispositivo não pode ser conectado localmente (que foi o meu caso em ambas opções).
O problema e que o WM não faz essa alteração automaticamente no SQLite, então neste caso em cada versão que lançar devera ser colocado um Script Manual para rodar antes da conexão local ao SQLite.
Segue função para ser executada antes da conexão local
Procedure GL_SQLLocal()
//Nova Coluna
ctConn is Connection
ctConn..Source = fDataDir + "/" + "baselocal.db" //aqui vai o caminho onde esta seu arquivo SQLite na APP
ctConn..Provider = hNativeAccessSQLite
ctConn..User = ""
ctConn..Password = ""
ctConn..Server = fDataDir + "/" + "baselocal.db" //aqui vai o caminho onde esta seu arquivo SQLite na APP
ctConn..Database = ""
ctConn..Access = hOReadWrite
IF HOpenConnection(ctConn) = False THEN
Error("Imposivel Realizar Conexão", HErrorInfo(hErrMessage))
EndProgram(True)
END

IF HChangeConnection("*",ctConn) = False THEN
Error("Imposivel Selecionar uma Conexão Local", HErrorInfo(hErrMessage))
EndProgram(True)
FIN

sql is string
query is Data Source

sql="alter table parametros add servidor_online varchar(200)"

// Alter table necessário
IF NOT HExecuteSQLQuery(query,sql) THEN
Error("Erro ao Modificar Base de Dados Local"+RC+HErrorInfo())
RETURN
END


--
Atte. Willian Fernando
Best Regards Willian Fernando
→ Revenir à WINDEV 25