Postada em 27/04/2017 14:40 hs
Olá boa tarde amigos,
Tenho um sistema onde terei que gerar uma lista de aniversariantes, e imprimi-la no crystal reorter, tenho uma fórmula que busca por data, mas pega dia mes e ano e colocando o ano atual nunca irá ter dados a ser impressos. Vou anexar abaixo o código caso alguém possa me ajudar nessa.
Preciso informar o período em dia e mês para listar os aniversariantes por exemplo do dia 01/4 a 30/04.
diai = Day(DtInicial)
mesi = Month(DtInicial)
anoi = Year(DtInicial)
diaf = Day(DtFinal)
mesf = Month(DtFinal)
anof = Year(DtFinal)
'Selecionamos os Registros que se enquadram entre as datas e a um cliente cadastrado no banco
CrystalReport1.SelectionFormula = "{RecDizimo.Diz_Dt_Nascimento} >= Date(" & anoi & "," & mesi & "," & diai & ") and " & _
"{RecDizimo.Diz_Dt_Nascimento} <= Date(" & anof & "," & mesf & "," & diaf & ")"
Desde já agradeço.
|
