Fórum select usando ADO no Access #320313
01/05/2006
0
uso o delphi 7, access, e rave report, estou fazendo um select para exibir no rave somente o usuário passado como parametro, mas nao esta dando certo, veja o exemplo: onde está errado??
procedure TFrmRelProdNome.Button1Click(Sender: TObject);
var
cod:string;
begin
AdoQuery1.Active := False;
AdoQuery1.SQL.Clear;
cod := wwDBLookupCombo1.Value;
AdoQuery1.SQL.Text:= ´select * from TabEntraProduto where produto = ´´+cod+´´ ´;
AdoQuery1.Prepared;
AdoQuery1.Active:= true;
FrmPrin.RvProject1.ProjectFile := ´RelEntProdNome.rav´;
FrmPrin.RvProject1.Execute;
FrmPrin.RvProject1.Close;
AdoQuery1.Active:=false;
end;
procedure TFrmRelProdNome.Button1Click(Sender: TObject);
var
cod:string;
begin
AdoQuery1.Active := False;
AdoQuery1.SQL.Clear;
cod := wwDBLookupCombo1.Value;
AdoQuery1.SQL.Text:= ´select * from TabEntraProduto where produto = ´´+cod+´´ ´;
AdoQuery1.Prepared;
AdoQuery1.Active:= true;
FrmPrin.RvProject1.ProjectFile := ´RelEntProdNome.rav´;
FrmPrin.RvProject1.Execute;
FrmPrin.RvProject1.Close;
AdoQuery1.Active:=false;
end;
Alvaro_web
Curtir tópico
+ 0
Responder
Posts
01/05/2006
Bon Jovi
Fala alvaro_web. Pra facilitar a ajuda, sempre que possível infome a msg de erro ou o ponto que trava se for travamento, senão vira ´jogo dos 7 erros´.
O campo produto é texto ou número? Se for texto:
O padrão SQL é usar aspas simples e não duplas. Talvez seja isso. QuotedStr coloca a string em aspas simples, mas vc poderia colocar na mão tb. Vc tb poderia passar o valor do parametros usando parameters sem concatenar na query.
O campo produto é texto ou número? Se for texto:
AdoQuery1.SQL.Text:= ´select * from TabEntraProduto where produto = ´ + QuotedStr(cod);
O padrão SQL é usar aspas simples e não duplas. Talvez seja isso. QuotedStr coloca a string em aspas simples, mas vc poderia colocar na mão tb. Vc tb poderia passar o valor do parametros usando parameters sem concatenar na query.
Responder
Gostei + 0
01/05/2006
Alvaro_web
Amigão, obrigado pela ajuda, fiz a alteração que voce sugeriu, mas continua selecionando todos os produtos(campo texto) e não dá nenhuma mendagem de erro, mais alguma sugestão?? desde já muito obrigado
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)