Add teh paramters to your report.
In your VB code do something like this:
Code: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)




Reply With Quote