Fórum Ajuda com Dois select no delphi #463016
04/12/2013
0
tipo preciso de ajuda pra fazer um select no Delphi que me traga como resultado:
os acessos que um usuário fez em um período determinado entre duas datas.
ja tentei de diversas formas e ainda não consegui.
obs: os usuários estão listados em um box
e há dois edit's para as datas.
me ajudem.
Junior
Curtir tópico
+ 0Posts
04/12/2013
Járabe Emanuel
IBQuery1.Close;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('Select * from Nome_Tabela ');
IBQuery1.SQL.Add('where Campo_Data between :DataInicio and :DataFim');
IBQuery1.ParamByName('DataInicio').AsDate := StrToDate(Edit1.Text);
IBQuery1.ParamByName('DataFim').AsDate := StrToDate(Edit2.Text);
IBQuery1.Open;
Espero ter ajudado.
Gostei + 0
05/12/2013
Junior
essas duas datas são filtradas dentro de um usuario:
ex: usuario adm:
acessos do dia 01/12/2013 a 30/12/2013
estou usando a paleta ado com mysql
Gostei + 0
05/12/2013
Járabe Emanuel
essas duas datas são filtradas dentro de um usuario:
ex: usuario adm:
acessos do dia 01/12/2013 a 30/12/2013
estou usando a paleta ado com mysql
Pelo que entendi vc quer filtrar informações dentro de duas datas, sendo esse filtro feito em um usuário especifico.
se for isso mesmo, o código terá uma pequena mudança.
veja como fica com a alteração que vc quer.
IBQuery1.Close;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('Select * from Nome_Tabela ');
IBQuery1.SQL.Add('where (Campo_Data between :DataInicio and :DataFim) and (campo_Nome_Usuario = :Usuario)');
IBQuery1.ParamByName('DataInicio').AsDate := StrToDate(Edit1.Text);
IBQuery1.ParamByName('DataFim').AsDate := StrToDate(Edit2.Text);
IBQuery1.ParamByName('Usuario').AsString := 'Nome_do_Usuario';
IBQuery1.Open;
Gostei + 0
11/12/2013
Junior
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)