Preciso executar um script , são varios comandos em umarqui.sql, quando executo 
uma linha tudobem , mas quando são varias linhas de insert por exemplo ele não 
reconhece a segunda linha
 
Aldinei

Fabio Giro <[EMAIL PROTECTED]> escreveu:
Adapte as suas necessidades.

para exluir o campo
Alter table nome_da_table drop nome_do_campo

para incluir o campo
Alter table nomeda_tabela add nome_do_campo tipo_do_campo

para alterar tamanho
ALTER TABLE CLIENTE ALTER COLUMN NOME TYPE VARCHAR (60);
alter table alter type char(18)

Alterar nome do campo
ALTER TABLE CLIENTES ALTER NOME TO NOME_CLIENTE;

Alterar tipo do campo
ALTER TABLE CLIENTES ALTER NOME TYPE CHAR(50);

*******************************************

procedure TForm1.Button1Click(Sender: TObject);
begin
// Se o campo for varchar(20) e quiser alterar para varchar(10)
IBTransaction1.StartTransaction;
IBSQL1.ExecQuery; // Alter table cadastro add campo7 VARCHAR(10);
IBTransaction1.CommitRetaining;

IBTransaction1.StartTransaction;
IBSQL2.ExecQuery; //update cadastro set campo7 = campo6 where pk_campo1 >
0
IBTransaction1.CommitRetaining;

IBTransaction1.StartTransaction;
IBSQL3.ExecQuery; // Alter table cadastro drop campo6;
IBTransaction1.CommitRetaining;

IBTransaction1.StartTransaction;
IBSQL3A.ExecQuery; // alter table cadastro add campo6 varchar(10);
IBTransaction1.CommitRetaining;

IBTransaction1.StartTransaction;
IBSQL4.ExecQuery; // update cadastro set campo6 = campo7 where pk_campo1 >
0
IBTransaction1.CommitRetaining;

IBTransaction1.StartTransaction;
IBSQL5.ExecQuery; // Alter table cadastro drop campo7;
IBTransaction1.CommitRetaining;
end;

Espero ter ajudado.

----- Original Message -----
From: "Aldinei Simoes" 
To: 
Sent: Friday, May 27, 2005 10:57 AM
Subject: [delphi-br] Executar script


Bom dia
Como executar um script do FB via query

Aldinei




--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos










--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.322 / Virus Database: 267.0.0 - Release Date: 27/05/2005





-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.322 / Virus Database: 267.0.0 - Release Date: 27/05/2005






-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos










__________________________________________________
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a