pass value in crystal report through textbox

[Neetu17]

During pass value in crystal report through textbox

Error : Subscripition Out of range

I want to pass the text value in field...bill_amt of crystal report
report1.rpt is crystal report

for this i used-----
Dim APPL As CRAXDRT.Application
Dim rpt As New CRAXDRT.Report

Set APPL = New CRAXDRT.Application

x = App.Path & "\" & "report1.rpt"
Set rpt = APPL.OpenReport(x, 1)
rpt.DiscardSavedData
rpt.Database.SetDataSource RS
rpt.ParameterFields(bill_amt).Value = Text5.Text 'subscript out of range

'cryst is crystal report
Cryst.ReportSource = rpt
Cryst.ViewReport

how this problem resolved???

[ducky]

Looks like maybe your missing quotes in the parameter field name, thus causing the subscript out of range. Try

rpt.ParameterFields("bill_amt").Value = Text5.Text

[Neetu17]

Thanks for ur reply

But I hv already used this and when i used " " then error occur

type mismatch....

[Neetu17]

pls Reply.....
if someone know how to pass the textbox value in parameter field value of crystal report through vb programming....

[Pasvorto]

I have always used:

Report.ParameterFields.ITEM(1).AddCurrentValue glbDate
Report.ParameterFields.ITEM(2).AddCurrentValue glbDate1

[Neetu17]

I have always used:

Report.ParameterFields.ITEM(1).AddCurrentValue glbDate
Report.ParameterFields.ITEM(2).AddCurrentValue glbDate1

thanks for ur reply..... Now my problem has solved..actually main problem is in datatype of crystal report...