Fórum Pesquisa/Consulta em ADO com Access 2000 #243547
18/07/2004
0
Gostaria de saber o que substitui em ADO o SetKey e FindKey.
Pois quero realizar uma pesquisa em ADO só que com FindKey e SetKey, não consigo, se poderem me mandar um exemplo de como posso fazer uma consulta/Pesquisa em ADO e que tambem substitua o exemplo abaixo, eu agradeço.
Desde já OBRIGADO
Dm.TbManifesto.SetKey;
Dm.TbManifesto.FieldByName(´CMAN_MAN´).AsString := Trim(EdtManif.Text);
if not Dm.TbManifesto.FindKey([Trim(EdtManif.Text)]) then
begin
TOper := ´I´;
MskCMot.Enabled := True;
end;
Pois quero realizar uma pesquisa em ADO só que com FindKey e SetKey, não consigo, se poderem me mandar um exemplo de como posso fazer uma consulta/Pesquisa em ADO e que tambem substitua o exemplo abaixo, eu agradeço.
Desde já OBRIGADO
Dm.TbManifesto.SetKey;
Dm.TbManifesto.FieldByName(´CMAN_MAN´).AsString := Trim(EdtManif.Text);
if not Dm.TbManifesto.FindKey([Trim(EdtManif.Text)]) then
begin
TOper := ´I´;
MskCMot.Enabled := True;
end;
Canastra
Curtir tópico
+ 0
Responder
Posts
18/07/2004
Bon Jovi
Substituto acho q não tem. Mas tem uma alternativa que é o Locate:
Exemplos:
if not ADODataSet1.Locate(´CMAN_MAN´, Trim(EdtManif.Text), []) then
...
if ADODataSet1.Locate(´NOME´, edtNome.Text, [loPartialKey]) then
...
Exemplos:
if not ADODataSet1.Locate(´CMAN_MAN´, Trim(EdtManif.Text), []) then
...
if ADODataSet1.Locate(´NOME´, edtNome.Text, [loPartialKey]) then
...
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)