Fórum Record Not Found!?!?!?!?! #296065
19/09/2005
0
Estou usando um ADODATASET.
No OnExit de um Edit eu coloco o seguinte codigo:
qClienteforn.Close;
qClienteForn.Open;
if qClienteForn.Locate(´CAEIDENT´, strtoint(edtCodCliente.Text), []) then
Edit1.text := qClienteFornCAERZSOC.AsString
else
showmessage (´Código não encontrado!´);
Quando dou o locate, o programa diz o seguinte:
qClienteForn: Record Not Found...
O q eh ?!?!?!??!??
Desde Já agradeço!
Diegus
Curtir tópico
+ 0Posts
19/09/2005
Rjun
Gostei + 0
19/09/2005
Diegus
select * from CAEFORNE
Somente isto...
Estou chamando todos os registro cadastrados na tabela de FOrnecedores (CAEFORNE)
Gostei + 0
19/09/2005
Rjun
qClienteForn.Open; try if qClienteForn.Locate(´CAEIDENT´, StrToInt(edtCodCliente.Text), []) then Edit1.text := qClienteForn.FieldByName(´CAERZSOC´).AsString else showmessage (´Código não encontrado!´); finally qClienteForn.Close; end;
Gostei + 0
19/09/2005
Diegus
qClienteForn.Open; try if qClienteForn.Locate(´CAEIDENT´, StrToInt(edtCodCliente.Text), []) then Edit1.text := qClienteForn.FieldByName(´CAERZSOC´).AsString else showmessage (´Código não encontrado!´); finally qClienteForn.Close; end;
Amigão!!! Num deu certo..... :´( :(
Mais alguma sugestão ?!?!?!?? :D
Agradeço desde já...
Gostei + 0
19/09/2005
Rjun
CommandText = ´SELECT * FROM CAEFORNE´; CommandType = cmdText;
Você alterou mais alguma propriedade? Com certeza o erro não está no código, pois fiz um teste aqui e funcionou.
Gostei + 0
19/09/2005
Diegus
CommandText = ´SELECT * FROM CAEFORNE´; CommandType = cmdText;
Rjun! Vlw cara pela atenção... conferi todos as propriedades... sabe q q eu fiz pra acertar? coloquei outro adodataset.
Vlw!!
Gostei + 0
19/09/2005
Rjun
Mais uma para os mistérios da informática....
Gostei + 0
19/09/2005
Diegus
Mais uma para os mistérios da informática....[/quote:3c70c27cbe]
Rsrsrsr.... serah q eh pq o formulario q estou usando eh uma herança de outro formulário?
mas o select q coloquei no qClienteForn eh do formulario filho...
Doidera!!
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)