arrecem comecei
como faço pra inserir via comandos SQL os dados de minhas edits para a minha tabela
tipo
insert......
Vleu
tipo
insert......
Vleu
Anonymous
Curtidas 0
Respostas
C-t
07/03/2003
POR ACASO SEU NOME É PAULO
GOSTEI 0
Bruno
07/03/2003
não sou o Bruno
mas mesmo assim vc pode me dizer como devo proceder??
mas mesmo assim vc pode me dizer como devo proceder??
GOSTEI 0
Anonymous
07/03/2003
Insert into <nome tabela> (<campos da tabela>)
values (<valores inseridos em cada campo>);
os <campos da tabela> e os <valores inseridos em cada campo> tem que ser separados por virgula e estarem na mesma ordem.
Espero ter ajudado
Mariangela
values (<valores inseridos em cada campo>);
os <campos da tabela> e os <valores inseridos em cada campo> tem que ser separados por virgula e estarem na mesma ordem.
Espero ter ajudado
Mariangela
GOSTEI 0
C-t
07/03/2003
K-RA SE VC ESTIVER USANDO UMA QUERY ... VC COLOCA ASSIM NELA NA PROPRIEDADE SQL : SELECT * FROM <NOME TABELA >
E DEPOIS NO BOTÃO QUE VAI INCLUIR O REGISTRO VC COLOCA ASSIM
IBQfunci.Close;
IBQfunci.SQL.Clear;
IBQfunci.SQL.Add(´insert INTO NOMEDATABELA values(:CAMPO1,:CAMPO2,:,CAMPO3)´);
if application.MessageBox(´Deseja confirmar a inclusão´,´Atenção´,mb_yesno+mb_iconwarning)=mryes then
begin
IBQUERY.ParamByName(´CAMPO1´).AsString:=Edit_CAMPO1.Text;
IBQUERY.ParamByName(´CAMPO2´).AsString:=Edit_CAMPO2.Text;
IBQUERY.ParamByName(´CAMPO3´).AsString:=Edit_CAMPO3.Text;
IBQfunci.ExecSQL;
IBQfunci.Close;
IBTRANSACTION1.Commit;
END;
QUALQUER COISA ESCREVA
E DEPOIS NO BOTÃO QUE VAI INCLUIR O REGISTRO VC COLOCA ASSIM
IBQfunci.Close;
IBQfunci.SQL.Clear;
IBQfunci.SQL.Add(´insert INTO NOMEDATABELA values(:CAMPO1,:CAMPO2,:,CAMPO3)´);
if application.MessageBox(´Deseja confirmar a inclusão´,´Atenção´,mb_yesno+mb_iconwarning)=mryes then
begin
IBQUERY.ParamByName(´CAMPO1´).AsString:=Edit_CAMPO1.Text;
IBQUERY.ParamByName(´CAMPO2´).AsString:=Edit_CAMPO2.Text;
IBQUERY.ParamByName(´CAMPO3´).AsString:=Edit_CAMPO3.Text;
IBQfunci.ExecSQL;
IBQfunci.Close;
IBTRANSACTION1.Commit;
END;
QUALQUER COISA ESCREVA
GOSTEI 0
C-t
07/03/2003
ESQUECI ..DEPOIS DO END
COLOCA ISSO
end
else
ibtransaction1.Rollback;
IBQfunci.SQL.Clear;
IBQfunci.SQL.Add(´select * from NOMEDATABELA ´);
IBQfunci.Open;
COLOCA ISSO
end
else
ibtransaction1.Rollback;
IBQfunci.SQL.Clear;
IBQfunci.SQL.Add(´select * from NOMEDATABELA ´);
IBQfunci.Open;
GOSTEI 0