Como recuperar o resultado de um COUNT quando se usa ADO?
senhores.
Não estou conseguido recuperar o resultado de um COUNT quando uso o ADOquery. Já tentei varias forma e não consegui.
Vejam o pequeno programa abaixo. Ao executa-lo recebo um erro ADOQ1: Field ´NumPred´ not found.
procedure TForm1.FormActivate(Sender: TObject);
var
strsql:string;
numpred: integer;
begin
adoq1.Close;
strsql:=´select Count(*) as numpred from predio´;
adoq1.SQL.Clear;
adoq1.SQL.Add(strsql);
adoq1.ExecSQL;
numpred:=adoq1.fieldbyname(´numpred´).AsInteger;
edit1.Text:=inttostr(numpred);
close;
end;
O que devo fazer ???
sds
Rounilo
Não estou conseguido recuperar o resultado de um COUNT quando uso o ADOquery. Já tentei varias forma e não consegui.
Vejam o pequeno programa abaixo. Ao executa-lo recebo um erro ADOQ1: Field ´NumPred´ not found.
procedure TForm1.FormActivate(Sender: TObject);
var
strsql:string;
numpred: integer;
begin
adoq1.Close;
strsql:=´select Count(*) as numpred from predio´;
adoq1.SQL.Clear;
adoq1.SQL.Add(strsql);
adoq1.ExecSQL;
numpred:=adoq1.fieldbyname(´numpred´).AsInteger;
edit1.Text:=inttostr(numpred);
close;
end;
O que devo fazer ???
sds
Rounilo
Rounilo
Curtidas 0
Respostas
Vinicius2k
18/12/2004
Colega,
Apenas substitua o método [b:fcb8ecb551]ExecSQL[/b:fcb8ecb551] pelo método [b:fcb8ecb551]Open[/b:fcb8ecb551].
As queries com instruções SELECT devem ser abertas... já queries com instruções INSERT, UPDATE, DELETE e DDLs devem ser executadas.
Espero ter ajudado.
T+
Apenas substitua o método [b:fcb8ecb551]ExecSQL[/b:fcb8ecb551] pelo método [b:fcb8ecb551]Open[/b:fcb8ecb551].
As queries com instruções SELECT devem ser abertas... já queries com instruções INSERT, UPDATE, DELETE e DDLs devem ser executadas.
Espero ter ajudado.
T+
GOSTEI 0