Passagem de data como parâmetro

[frias]

Bom dia pessoal, sou novo aqui no fórum e to com dúvida em relação a passagem de parâmetro pro Crystal.

Depois de pesquisar aqui no fórum mesmo, fiz da seguinte forma:

Dim crAppl As CRAXDRT.Application, crRep As CRAXDRT.report
Set crAppl = New CRAXDRT.Application
Set crRep = crAppl.OpenReport("C:\vb\Sistema\rpt\Contas_Pagar.rpt")

crRep.RecordSelectionFormula = "{tblContasPagar.dt_vencimento} >= #" & Format(datainicio, "dd/mm/yyyy") & "#" & _
" AND {tblContasPagar.dt_vencimento} <= #" & Format(datafim, "dd/mm/yyyy") & "#"

crRep.PrintOut True, 1

O erro que está retornando é:

Run-time error '-2147189166 (80047e52)'

Failed to open a rowset.

Details: ADO Error Code: 0x80040e21

Source: IBOLE.TIBOLECommand

Description Dynamic SQL ERROR

SQL Error Code = -804

Function unknown

CONVERT

Alguém saberia como resolver?

Obrigado,

Ricardo Frias

Editado Maio 22, 2009 por frias

[frias]

Ninguém???

[kuroi]

frias, tem certeza q esse erro acontece nessa formula mesmo??

se você tentar executar dentro do crystal reports, ele deve apontar a formula do erro, veja la.

apesar de q nunca vi essa mensagem, talvez seja erro no sql ainda.

se for essa formula mesmo, o campo dt_vencimento é mesmo do tipo data??

[frias]

frias, tem certeza q esse erro acontece nessa formula mesmo??

se você tentar executar dentro do crystal reports, ele deve apontar a formula do erro, veja la.

apesar de q nunca vi essa mensagem, talvez seja erro no sql ainda.

se for essa formula mesmo, o campo dt_vencimento é mesmo do tipo data??

Consegui resolver passando o SQL todo pro Crystal (com os parâmetros), e não apenas os parâmetros que eu queria...

[]´s