Passing date parameter to Crystal - won't work

[jjoy123123]

I'm trying to pass a date parameter from VB6 to Crystal 8.0. The text parameter is working, but I can not get the date to pass. Any suggestions? Here's my code:


With CrystalReport1
.ReportFileName = App.Path & "\PatientReport.rpt"
.ParameterFields(0) = "Name;" & txtName.Text & ";True"
.ParameterFields(1) = "DOB;" & CDate(txtDOB.Text) & ";True"
.PrintReport
End With

 

[mkuan]

How about passing the date as it's; not converting it using CDate function?

 

[CCLINT]

Format$(txtDOB.Text,"yyyy,mm,dd&quot [/b][/i][/u][sub]*******************************************************
General remarks:
If this post contains any suggestions for the use or distribution of code, components or files of any sort, it is still your responsibility to assure that you have the proper license and distribution rights to do so!

 

[jjoy123123]

I tried

.ParameterFields(1) = "DOB;" & Format$(txtDOB.Text, "yyyy,mm,dd&quot & ";True"

It still wouldn't display the report.