URGENT: Passing Params in WebForm??!!

[tripower]

Please assist with the following code I have been racking my brain for a week and cannot figure this out. This code works for me in my WinForms but using a Crystal Viewer in a WebForm I cannot pass parameters - at all. If I run a test report with no parameters it runs just fine. Db is Oracle 9i. Any help whatsoever is appreciated.

Dim CrystalDecisions.Shared.TableLogOnInfo crTableLogonInfo as New CrystalDecisions.Shared.TableLogOnInfo()
Dim CrystalDecisions.Shared.ConnectionInfo crConnectionInfo as New CrystalDecisions.Shared.ConnectionInfo()
Dim CrystalDecisions.CrystalReports.Engine.ReportDocument myreportdocument as New CrystalDecisions.CrystalReports.Engine.ReportDocument()

' Assign logon information
crConnectionInfo.UserID = "myuser"
crConnectionInfo.Password = "mypassword"
crConnectionInfo.DatabaseName = "myoracledb"

' Using Crystal Command to build query no SP
' Create logon information for each "table" accessed in Command
crTableLogonInfo.ConnectionInfo = crConnectionInfo
crTableLogonInfo.ReportName =ReportName 'pass in complete report name and path
crTableLogonInfo.TableName ="Command"

myreportdocument.Load(ReportName)
myreportdocument.Database.Tables(0).ApplyLogOnInfo(crTableLogonInfo)

' 0-------BEGIN simple Parameter Value----------------------

Dim CrystalDecisions.CrystalReports.Engine.ParameterFieldDefinitions crParameterFieldDefinitions=null
Dim CrystalDecisions.CrystalReports.Engine.ParameterFieldDefinition crParameterFieldDefinition0=null

crParameterFieldDefinitions = myreportdocument.DataDefinition.ParameterFields'this.crystalViewer.ParameterFieldInfo '
crParameterFieldDefinition0 = crParameterFieldDefinitions(0)

CrystalDecisions.Shared.ParameterValues crParameterValues0=New CrystalDecisions.Shared.ParameterValues()
CrystalDecisions.Shared.ParameterDiscreteValue crParameterDiscreteValue0=New CrystalDecisions.Shared.ParameterDiscreteValue()

crParameterValues0 = crParameterFieldDefinition0.CurrentValues
crParameterDiscreteValue0 = New CrystalDecisions.Shared.ParameterDiscreteValue()
crParameterDiscreteValue0.Value = 2 'Assign Parameter Here
crParameterValues0.Add(crParameterDiscreteValue0)
crParameterFieldDefinition0.ApplyCurrentValues(crParameterValues0)

' 0-------END simple Parameter Value----------------------

crystalViewer.ReportSource = myreportdocument
crystalViewer.DataBind()

[tripower]

Bump.

[tripower]

Bump.
bump