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 gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Hye, Pb with parameters and CrystalReportInteractiveViewer

Status
Not open for further replies.

scoubidoou

Programmer
Jun 17, 2003
1
FR

Hye
With my code i found to edit graphic and the graphic change when i passed parameters
But when i passed parameter the graphic don't change and my report don't read the new value if you can help me thks

See the code for more information
Dim objectFactory, theReportName, viewer
theReportName = "C:\Program Files\Crystal Decisions\Report Application Server 9\Reports\Test.rpt"
'CREATE OBJECT
Set objectFactory = Server.CreateObject("CrystalReports.ObjectFactory.2")
Set viewer = objectFactory.CreateObject"CrystalReports.CrystalReportInteractiveViewer")
With viewer
.Name = "MonRapportARGEL"
.IsDisplayToolbar = False
.IsDisplayPage = True
.IsOwnPage = False
.IsOwnForm = False
.EnableParameterPrompt = True
.HasGotoPageButton = False
.HasExportButton = False
.HasToggleGroupTreeButton = False
.HasCrystalLogo = False
.HasPageNavigationButtons = False
.HasPrintButton = False
.HasRefreshButton = False
.HasSearchButton = False
.HasViewList = False
.HasZoomFactorList = False
.HasHelpButton = False
.HasHeaderArea = False
.PageToTreeRatio = 100
.ZoomFactor = 100
.ReportSource = theReportName
.ProcessHttpRequest Request, Response,Session
'CREATE PARAMETERS
Set paramdef = viewer.ParameterFields(0)
paramdef.CurrentDiscreteValues.Add("08")
End With


tHKS
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top