Fórum Criar consulta no BD via código #235810
02/06/2004
0
Eu tenho uma aplicação em delphi 7 e bd access. Eu queria fazer uma pesquisa no banco de dados via código, onde esta pesquisa terá que ser salva na consulta do banco de dados.
A seguinte consulta não serve, pois só pesquisa e não salva no bd
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´Select codigo, cliente from Tabela Where Codigo=1´);
Query1.Open;
[b:43eab02149]Será que alguém pode me ajudar?[/b:43eab02149]
[b:43eab02149][color=red:43eab02149]Título editado pelo Moderador (AZ) - Removido: ´CRIAR CONSULTA NO BD VIA CODIGO´[/color:43eab02149][/b:43eab02149]
A seguinte consulta não serve, pois só pesquisa e não salva no bd
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´Select codigo, cliente from Tabela Where Codigo=1´);
Query1.Open;
[b:43eab02149]Será que alguém pode me ajudar?[/b:43eab02149]
[b:43eab02149][color=red:43eab02149]Título editado pelo Moderador (AZ) - Removido: ´CRIAR CONSULTA NO BD VIA CODIGO´[/color:43eab02149][/b:43eab02149]
Juliocoelho
Curtir tópico
+ 0
Responder
Posts
03/06/2004
Paulo
será isso?
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´Select codigo, cliente from Tabela Where Codigo=1´);
Query1.Open;
Query1.First;
while not Query1.Eof do begin
Query1.Insert;
Query1.Post;
Query1.Next;
end;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´Select codigo, cliente from Tabela Where Codigo=1´);
Query1.Open;
Query1.First;
while not Query1.Eof do begin
Query1.Insert;
Query1.Post;
Query1.Next;
end;
Responder
Gostei + 0