ADOQuery com ACCESS

Delphi

16/10/2004

Olha só pessoal fiz uma consulta usando ADOQuery e SQL e quando vou executar a consulta, Não retorna nenhum dado mas tenho certeza de os registros existem vou mandar o código para vcs verem

[b:c62e3345d3]ADOQuery1.Close;
ADOQuery1.sql.Clear;
ADOQuery1.SQL.Add(´select * From Tab_Civil where Tab_Civil.Cod_Artigo=´+#39+´¬´+ Combo_Artigo.Text +´¬´+39);
ADOQuery1.ExecSQL;
ADOQuery1.Open;
if ADOQuery1.RowsAffected <= 0 then
begin
ShowMessage(´Desculpe mas não foi encontrado nenhuma ocorrencia com esses dados.´);
end;[/b:c62e3345d3]


Luisandro

Luisandro

Curtidas 0

Respostas

Bon Jovi

Bon Jovi

16/10/2004

Use IsEmpty ou Recordcount. RowsAffected parece ser para retornar numero de registros atualizados ou deletados.


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

16/10/2004

Colega,

ADOQuery1.Close; 
ADOQuery1.sql.Clear; 
ADOQuery1.SQL.Add(´select * From Tab_Civil where Tab_Civil.Cod_Artigo=´+#39+´¬´+ Combo_Artigo.Text +´¬´+39); 
ADOQuery1.ExecSQL; // Não funciona para select, aliás, deveria levantar uma exceção;
ADOQuery1.Open; 
{
if ADOQuery1.RowsAffected <= 0 then 
begin 
ShowMessage(´Desculpe mas não foi encontrado nenhuma ocorrencia com esses dados.´); 
end;
} // Também não funciona, conforme mencionado pelo colega Bon Jovi.

Você pode utilizar uma dbGrid para visualizar o resultado da consulta.


GOSTEI 0
POSTAR