Na realidade vc tem duas formas de passar estes parametros:
1º Select * From Tabela Where Data Between :DataInicio and :DataFim
ai vc usa as variaveis datainicio e datafim via Parambyname. Ex:
IBQuery1.ParamByName('DataInicio').Value := ....
e depois vc da o open da Tabela
2º fazer direto o SQL via codigo:
'Select * From Tabela Where Data Between' + #39 + edtdataIni.Text + #39 +
'and' + #39 +edtDataFim.text + #39
Espero ter ajudado!
-----Mensagem original-----
De: Solange <[EMAIL PROTECTED]>
Enviada em: 22/11/2005 10:00:55
Para: <delphi-br@yahoogrupos.com.br>
Assunto: Re: [delphi-br] Consulta com datas
Já tentei fazer assim, mas como passo estes parâmetros para a query onde tenho
o select?
----- Original Message -----
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, November 22, 2005 10:36 AM
Subject: RES: [delphi-br] Consulta com datas
select * from tb_receber
where data_vencimento BETWEEN :data_inicial and :data_final
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de solangevoss
Enviada em: terça-feira, 22 de novembro de 2005 08:27
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Consulta com datas
Olá, eu estou fazendo uma consulta com datas e simplemente não está
funcionando.
Na query IBQuery estou fazendo o seguinte select:
select * from tb_receber where data_vencimento>=:data_vencimento and
data_vencimento<=:data_vencimento
Na tela de consulta eu forneço as duas datas e no botão procurar
tenho o seguinte código:
data_ini:=strtodate(data1.text);
data_fi:=strtodate(data2.text);
DMConsulta.QConsulta_receber.close;
DMConsulta.QConsulta_receber.parambyname('data_vencimento').asdate :=
data_ini;
DMConsulta.QConsulta_receber.parambyname('data_vencimento').asdate :=
data_fi;
DMConsulta.QConsulta_receber.open;
Se eu faço a consulta somente com uma data ele funciona, mas não sei
porque com as duas data não dá certo.
Eu utilizo o delphi 6 e o Interbase.
Já procurei na internet, e encontro exemplos diferentes de como eu
estou fazendo, porque eu utilizo a query e passo os parâmetros para
ela.
Se alguém puder me dar uma luz, fico agradecida.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
----------------------------------------------------------------------------
--
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
__________ NOD32 1.1296 (20051121) Information __________
This message was checked by NOD32 antivirus system.
http://www.nod32.com
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
------------------------------------------------------------------------------
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
