Fórum Erro ao ativar componente... Urgente!!! #190230
22/10/2003
0
Olá pessoal,
Atendendo a pedidos, volta a colocar minha questão impossível no Forum...
Estou tentando executar a query abaixo acessando um servidor SQLSERVER via componmentes ADO :
Qry_Geral.close;
Qry_Geral.sql.Clear;
Qry_Geral.sql.add(´select usuario from usuarios´);
Qry_Geral.Active := true;
Quando executo a primeira vez não dá erro. O problema é que quando clico no bptão para executá-la novamente, ocorre o seguint erro :
´BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação atual requer um registro atual.´
Alguém pode me ajudar?
[]´s
Valeu!!!
Atendendo a pedidos, volta a colocar minha questão impossível no Forum...
Estou tentando executar a query abaixo acessando um servidor SQLSERVER via componmentes ADO :
Qry_Geral.close;
Qry_Geral.sql.Clear;
Qry_Geral.sql.add(´select usuario from usuarios´);
Qry_Geral.Active := true;
Quando executo a primeira vez não dá erro. O problema é que quando clico no bptão para executá-la novamente, ocorre o seguint erro :
´BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação atual requer um registro atual.´
Alguém pode me ajudar?
[]´s
Valeu!!!
Hebrao
Curtir tópico
+ 0
Responder
Posts
22/10/2003
Marcelo Saviski
Você só tem ese código no evento do Botão?
se tiver mais, coloque-os aqui, pode não ser isso citado acima
se tiver mais, coloque-os aqui, pode não ser isso citado acima
Responder
Gostei + 0
22/10/2003
Bampavao
O que o Marcelo disse é verdade, pois aparentemente não ha nada de errado....
Tenta de outros jeitos...
Qry_Geral.close;
Qry_Geral.sql.Clear;
Qry_Geral.sql.add(´select usuario from usuarios´);
Qry_Geral.Open;
ou
with Qry_Geral do begin
Close;
Sql.Clear;
Sql.Add(´SELECT USUARIO FROM USUARIOS´);
if not Active then Open
else Requery;
Falow
Tenta de outros jeitos...
Qry_Geral.close;
Qry_Geral.sql.Clear;
Qry_Geral.sql.add(´select usuario from usuarios´);
Qry_Geral.Open;
ou
with Qry_Geral do begin
Close;
Sql.Clear;
Sql.Add(´SELECT USUARIO FROM USUARIOS´);
if not Active then Open
else Requery;
Falow
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)