Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

VB6 & Crystal parms

Status
Not open for further replies.

DanNorris2000

Technical User
Nov 10, 2000
186
US
Is there a way to supply a value for a specific parameter by parm name instead of Parameterfields(1)?
I have a list of quarterly reports that use either
{?bookto} or {?bookfrom}to {?bookto}
I would like to supply both values up front

Dim appl As New CRAXDRT.Application
Dim rep As CRAXDRT.Report


Private Sub Command1_Click()
Set rep = appl.OpenReport("k:\vfp\reinsurance\reports\22dr.rpt")
rep.ParameterFields(1).AddCurrentValue Val("200212")
rep.ExportOptions.DiskFileName = "k:\pdf\22dr.pdf"
rep.ExportOptions.DestinationType = crEDTDiskFile
rep.ExportOptions.FormatType = crEFTPortableDocFormat
rep.Export False

End Sub
 
Try this:

rep.ParameterFields.GetItemByName("ParamName").AddCurrentValue "200212"
 
How would I set that up to prompt once for all parms. The reports use the same name throughout.
 
just have them enter a value and then take what they entered and assign it to each report as shown above.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top