Consulta entre datas usando IF apenas pelo dia e mes
25/03/2003
0
Ola Pessoal,
Como eu posso fazer uma consulta entre datas, usando apenas o IF. Eu sei fazer com sql, mas neste caso nao me convem usar. Tenho 2 maskedit, um com a data final e outro com a data inicial, sendo que eu irei digitar apenas o dia e o mes que eu gostaria de consultar. Com a ajuda de um colega do forum, a pesquisa deu certo usando este código:
while not tabela.eof do
begin
if ([campo da tabela].asdatetime >= strtodate(data1.text)) and ([campo da tabela] <= strtodate(data2.text)) then
begin
[faça o que você quiser]
end;
tabela.next;
end;
Só que essa consulta pega a data toda, incluindo o ano. Eu gostaria que fosse apenas pelo dia e pelo mes.
Banco: DBF
Delphi:6.0
Obrigado
Vivian
Como eu posso fazer uma consulta entre datas, usando apenas o IF. Eu sei fazer com sql, mas neste caso nao me convem usar. Tenho 2 maskedit, um com a data final e outro com a data inicial, sendo que eu irei digitar apenas o dia e o mes que eu gostaria de consultar. Com a ajuda de um colega do forum, a pesquisa deu certo usando este código:
while not tabela.eof do
begin
if ([campo da tabela].asdatetime >= strtodate(data1.text)) and ([campo da tabela] <= strtodate(data2.text)) then
begin
[faça o que você quiser]
end;
tabela.next;
end;
Só que essa consulta pega a data toda, incluindo o ano. Eu gostaria que fosse apenas pelo dia e pelo mes.
Banco: DBF
Delphi:6.0
Obrigado
Vivian
Viviankb
Curtir tópico
+ 0
Responder
Posts
25/03/2003
Okama
if FormatDateTime(´DD´,[campo da tabela].asdatetime) = MaskEdit1.Text then
<bla bla bla>
Para verificar o mês, troque o ´DD´ por ´MM´. O Maskedit não precisa ser data, qualquer coisa que retorne dois campos serve, (dia ´31´ ou mês ´12´)
<bla bla bla>
Para verificar o mês, troque o ´DD´ por ´MM´. O Maskedit não precisa ser data, qualquer coisa que retorne dois campos serve, (dia ´31´ ou mês ´12´)
Responder
Clique aqui para fazer login e interagir na Comunidade :)