FORMULA DO CRYSTAL
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
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
vc está usando o mes de inicio e o dia de fim... tenta desta forma:
strFormula = [Ô] (DAY{ALUNOS.TBCLI_DATANASC} >= [Ô] & Day(CDate(MskInicio.Text)) & [Ô] AND MONTH{ALUNOS.TBCLI_DATANASC} >= [Ô] & Month(CDate(MskInicio.Text)) & [Ô]) AND (DAY{ALUNOS.TBCLI_DATANASC} <= [Ô] & Day(CDate(MskFim.Text)) & [Ô] AND MONTH{ALUNOS.TBCLI_DATANASC} <= [Ô] & Month(CDate(MskFim.Text)) & [Ô])[Ô]
apesar de que se for uma fórmula para o select, um BEETWEN cairia melhor
strFormula = [Ô] (DAY{ALUNOS.TBCLI_DATANASC} >= [Ô] & Day(CDate(MskInicio.Text)) & [Ô] AND MONTH{ALUNOS.TBCLI_DATANASC} >= [Ô] & Month(CDate(MskInicio.Text)) & [Ô]) AND (DAY{ALUNOS.TBCLI_DATANASC} <= [Ô] & Day(CDate(MskFim.Text)) & [Ô] AND MONTH{ALUNOS.TBCLI_DATANASC} <= [Ô] & Month(CDate(MskFim.Text)) & [Ô])[Ô]
apesar de que se for uma fórmula para o select, um BEETWEN cairia melhor
Tópico encerrado , respostas não são mais permitidas