vb6 with crystal report 9

[istiqlal]

hi
i have 1 comobo box for name and 2 text(date_from , date_to) and 1 buttun
i wont to pass aparmeter for (combox and text1 and txt2) from vb6 to crystal report 9
it must shoun in the report
name,date from.date_to,name of trane
wher i can mad conditon or qury(give the name of train for this emply between date_from and date_to )
how can i made the code
how i mae aparametrs

[istiqlal]

hi
i have 1 comobo box for name and 2 text(date_from , date_to) and 1 buttun
i wont to pass aparmeter for (combox and text1 and txt2) from vb6 to crystal report 9
it must shoun in the report
name,date from.date_to,name of trane
wher i can mad conditon or qury(give the name of train for this emply between date_from and date_to )
how can i made the code
how i mae aparametrs
Rate this post

[Pasvorto]

Add teh paramters to your report.
In your VB code do something like this:

Set Report = crxApplication.OpenReport("Z:\DAD\BOLSamples.rpt", 1)
For Each crxDatabaseTable In Report.Database.Tables
    crxDatabaseTable.ConnectionProperties("user id") = "sa"
    crxDatabaseTable.ConnectionProperties("Password") = myPasswordTechniSQL
Next crxDatabaseTable
Report.PaperOrientation = crDefaultPaperOrientation
'
'----------
'parameters
'----------
'
Report.ParameterFields.ITEM(1).AddCurrentValue Trim(txtCustomer.Text)
Report.ParameterFields.ITEM(2).AddCurrentValue Trim(txtShipDate.Text)
Report.ParameterFields.ITEM(3).AddCurrentValue Trim(txtBOL.Text)
Report.ParameterFields.ITEM(4).AddCurrentValue Trim(txtShipToName.Text)