Boa Tarde Amigos

 

Estou usando o CR7, com VB6 e estou com problemas na hora de criar uma formula dentro VB, para restringir os valores que serao pasados para o Crystal.

 

Eu digito uma data inicial e outra final,meu objetivo e emitir um relatorio com os aniversariantes do periodo digitado.Ate o momento cheguei a conclusao de que seria interessante comparar o dia e o mes digitados, com o dia e mes do dia/mes que estao na base de dados.

 

strFormula = " MONTH{ALUNOS.TBCLI_DATANASC} = " & Month(CDate(MskInicio.Text))
strFormula = strFormula & " AND DAY{ALUNOS.TBCLI_DATANASC} = " & Day(CDate(MskFim.Text))

Uso a sintaxe acima mas nada esta sendo filtrado.

 

Obrigado

 

Sidnei

Eu uso isso:

wStrSql & " day(P.D_Nascimento)>=" & Day(CDate(txtdtAniv1.Text)) & " and month(P.D_Nascimento)>=" & Month(CDate(txtdtAniv1.Text)) & _
         " and day(P.D_Nascimento)<=" & Day(CDate(txtdtAniv2.Text)) & " and month(P.D_Nascimento)<=" & Month(CDate(txtdtAniv2.Text))

Muito obrigado por sua ajuda J.Carlos

 

Infelizmente eu continuo com o mesmo problema.Uma serie de datas continuam a ser exibidas, sem o filtro especificado. e agora?

 

strFormula = " day(ALUNOS.TBCLI_DATANASC)>=" & Day(CDate(MskInicio.Text)) & " and month(ALUNOS.TBCLI_DATANASC)>=" & Month(CDate(MskInicio.Text))
strFormula = strFormula & " and day(ALUNOS.TBCLI_DATANASC)<=" & Day(CDate(MskFim.Text)) & " and month(ALUNOS.TBCLI_DATANASC)<=" & Month(CDate(MskFim.Text))

Como teste estou usando o periodo de 01/01/2010 a 31/01/2010 e estao sendo exibidos registros de outros meses.

 

Obrigado por sua ajuda.

 

Um Abraço

Estranho, Ventana. No meu caso aqui funciona. Uso o banco de dados SqlServer.

Tente ver aí as suas configurações regionais, talvez o seu mask edit está de um jeito  e na regional invertida. É só uma dica, talvez não seja nada disso.

OK, irei verificar.

 

Obrigado e um Abraço