Fórum Isql - Script Conexao com Banco de Dados #321149
11/05/2006
0
Pessoal,
Para executar um script para atualização de um banco de dado pelo Dephi,
venho fazendo da seguinte forma (funciona perfeitamente bem) :
Exemplo
. No Arquivo TXT (arq.txt)
CONNECT ´c:\database\bancoDados.gdb´ user ´sysdba´ password ´masterkey´ ;
update tabela
set campoPri = 1,
campoSeg = 2;
commit;
.No Delphi
linha_Sql := ´C:\DiretoriArquivoTexto\´ ;
opendialog1.InitialDir := linha_sql ;
if FileExists(Arq.text) then
begin
Linha_Sql := ´isql -input ´ + Arq.Text ;
WinExec (Pchar ( Linha_Sql ), sw_RESTORE ) ;
end
else
begin
ShowMessage(´Arquivo não existe!´);
abort ;
end ;
Como é que poderei fazer para que o arquivo texto NÃO contenha a linha de CONNECT (conexao com o banco de dados) e contenha apenas o SCRIPT, ou seja, a conexão com o banco seja feita no Delphi e não no TXT ?
Para executar um script para atualização de um banco de dado pelo Dephi,
venho fazendo da seguinte forma (funciona perfeitamente bem) :
Exemplo
. No Arquivo TXT (arq.txt)
CONNECT ´c:\database\bancoDados.gdb´ user ´sysdba´ password ´masterkey´ ;
update tabela
set campoPri = 1,
campoSeg = 2;
commit;
.No Delphi
linha_Sql := ´C:\DiretoriArquivoTexto\´ ;
opendialog1.InitialDir := linha_sql ;
if FileExists(Arq.text) then
begin
Linha_Sql := ´isql -input ´ + Arq.Text ;
WinExec (Pchar ( Linha_Sql ), sw_RESTORE ) ;
end
else
begin
ShowMessage(´Arquivo não existe!´);
abort ;
end ;
Como é que poderei fazer para que o arquivo texto NÃO contenha a linha de CONNECT (conexao com o banco de dados) e contenha apenas o SCRIPT, ou seja, a conexão com o banco seja feita no Delphi e não no TXT ?
Paty
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)