Problema com código

[ede1331 0]

Colegas alguem pode me ajudar, na execução a seguir não recebo resultados:

with Fdm do begin
  //ExeSQL(Titulos,'Select * from TITULOS where FILIAL =' + Edit7.Text );
  Lista_Contatos.ParamByName('INICIAL').AsDate:= StrToDate(MaskEdit1.Text);
  Lista_Contatos.ParamByName('FINAL').AsDate:= StrToDate(MaskEdit2.Text);
  SqlContatos:= 'Select * from CONTATOS where (DATA Between :INICIAL and :FINAL)';
  if Edit2.Text <> '' then
  SqlContatos:= SqlContatos + ' Where CNPJ = ' + i;
  ShowMessage(SqlContatos);
  ExeSQL(Lista_Contatos,SqlContatos);

end;

quem puder me ajudar fico grato...

[Roberto Fagundes 40]

Você está fazendo ao contrario o certo seria assim:

with Fdm do begin
  //ExeSQL(Titulos,'Select * from TITULOS where FILIAL =' + Edit7.Text );
  MaskEdit1.Text := Lista_Contatos.ParamByName('INICIAL').AsString;
  MaskEdit2.Text := Lista_Contatos.ParamByName('FINAL').AsString;
  SqlContatos:= 'Select * from CONTATOS where (DATA Between :INICIAL and :FINAL)';
  if Edit2.Text <> '' then
  SqlContatos:= SqlContatos + ' Where CNPJ = ' + i;
  ShowMessage(SqlContatos);
  ExeSQL(Lista_Contatos,SqlContatos);

end;

[ede1331 0]

 

Você está fazendo ao contrario o certo seria assim:

with Fdm do begin
  //ExeSQL(Titulos,'Select * from TITULOS where FILIAL =' + Edit7.Text );
  MaskEdit1.Text := Lista_Contatos.ParamByName('INICIAL').AsString;
  MaskEdit2.Text := Lista_Contatos.ParamByName('FINAL').AsString;
  SqlContatos:= 'Select * from CONTATOS where (DATA Between :INICIAL and :FINAL)';
  if Edit2.Text <> '' then
  SqlContatos:= SqlContatos + ' Where CNPJ = ' + i;
  ShowMessage(SqlContatos);
  ExeSQL(Lista_Contatos,SqlContatos);

end;

Na verdade quer recebe valor é o parametro, eu defino o parametro no MaskEdit depois levo ela pros parametros..

[ede1331 0]

encontrei meu problema, era no formato da data, mudei para yyyy/mm/dd, e funcionou, Obrigado.

 

 

entre varios foruns que visitei este foi o primeiro a levar a serio minha pergunta, obrigado.

[Motta 645]

Tem tambem dois WHERE , o segundo seria um AND