Isql - Script Conexao com Banco de Dados

Delphi

11/05/2006

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 ?


Paty

Paty

Curtidas 0
POSTAR