Setting Crystal Report parameters via a form problem

[Chris]

Hi,

I'm new to ASP.Net and Crystal but I've been playing with some samples
and have run into a problem.

If I put all my code into the Page_Init sub of a single form and run
that form, the Crystal report runs fine.

Now i am trying to create another web form where I can input
parameters, hit submit and have those parameters passed to the second
form to diplay the Report. Perhaps I don't understand how to pass them
from a web form. I created a sub routine in my 'Reports' form and
moved my code from the Page_Init sub to this sub. Then I try to call
the sub from my Submit action in my parameter entry form. The code
fails when the sub trys to execute the following:

CrystalReportVi ewer1.ReportSou rce = myReport

It fails with 'Object reference not set to an instance of an object'.

Here is the code that works if it is in the Page_Init sub:

Imports CrystalDecision s.CrystalReport s.Engine
Imports CrystalDecision s.Shared

Public Class WebForm1
Inherits System.Web.UI.P age
Protected WithEvents CrystalReportVi ewer1 As
CrystalDecision s.Web.CrystalRe portViewer

#Region " Web Form Designer Generated Code "

'This call is required by the Web Form Designer.
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub
InitializeCompo nent()

End Sub
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Init
Dim myReport As New ReportDocument( )
Dim crParameterFiel dDefinitions As ParameterFieldD efinitions
Dim crParameterFiel dDefinition As ParameterFieldD efinition
Dim crParameterValu es As ParameterValues
Dim crParameterDisc reteValue As ParameterDiscre teValue
Dim crParameterFiel dValues As ParameterValues

'CODEGEN: This method call is required by the Web Form
Designer
'Do not modify it using the code editor.
InitializeCompo nent()
myReport.Load(" c:\inetpub\wwwr oot\web_viewer_ basic2\imp.rpt" )
crParameterFiel dDefinitions =
myReport.DataDe finition.Parame terFields
crParameterFiel dDefinition =
crParameterFiel dDefinitions.It em("Street Number")
crParameterValu es = crParameterFiel dDefinition.Cur rentValues
crParameterDisc reteValue = New ParameterDiscre teValue()
crParameterDisc reteValue.Value = "*400*" '1st current value
crParameterValu es.Add(crParame terDiscreteValu e)

**Snip, add more paramters. The values are hardcoded right
now.***

Dim crtableLogoninf os As New TableLogOnInfos ()
Dim crtableLogoninf o As New TableLogOnInfo( )
Dim crConnectionInf o As New ConnectionInfo( )
Dim CrTables As Tables
Dim CrTable As Table
Dim TableCounter

With crConnectionInf o
.ServerName = "DATABASE"
.DatabaseName = "dev"
.UserID = "userid"
.Password = password"
End With

**Snip, Loop through and login to all the tables**

CrystalReportVi ewer1.ReportSou rce = myReport
CrystalReportVi ewer1.DataBind( )

End Sub

Can anyone give me some pointers on how to submit the parameters from
another form and pass them through to this form? I also suspect that
my declaration may be in the wrong place in the code.

Thanks,

Chris

[Chris]

Actually, I solved the problem myself. First, I just used the
Response.Redire ct method and passed the variables to the viewer form.
It worked but I wanted it to open in a new browser window so I used
client-side Javascript to do it.

All I need to do now is figure out why my new window is not taking the
focus.

cf*****@hotmail .com (Chris) wrote in message news:<d9******* *************** ****@posting.go ogle.com>...

Hi,

I'm new to ASP.Net and Crystal but I've been playing with some samples
and have run into a problem.

If I put all my code into the Page_Init sub of a single form and run
that form, the Crystal report runs fine.

Now i am trying to create another web form where I can input
parameters, hit submit and have those parameters passed to the second
form to diplay the Report. Perhaps I don't understand how to pass them
from a web form. I created a sub routine in my 'Reports' form and
moved my code from the Page_Init sub to this sub. Then I try to call
the sub from my Submit action in my parameter entry form. The code
fails when the sub trys to execute the following:

CrystalReportVi ewer1.ReportSou rce = myReport

It fails with 'Object reference not set to an instance of an object'.

Here is the code that works if it is in the Page_Init sub:

Imports CrystalDecision s.CrystalReport s.Engine
Imports CrystalDecision s.Shared

Public Class WebForm1
Inherits System.Web.UI.P age
Protected WithEvents CrystalReportVi ewer1 As
CrystalDecision s.Web.CrystalRe portViewer

#Region " Web Form Designer Generated Code "

'This call is required by the Web Form Designer.
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub
InitializeCompo nent()

End Sub
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Init
Dim myReport As New ReportDocument( )
Dim crParameterFiel dDefinitions As ParameterFieldD efinitions
Dim crParameterFiel dDefinition As ParameterFieldD efinition
Dim crParameterValu es As ParameterValues
Dim crParameterDisc reteValue As ParameterDiscre teValue
Dim crParameterFiel dValues As ParameterValues

'CODEGEN: This method call is required by the Web Form
Designer
'Do not modify it using the code editor.
InitializeCompo nent()
myReport.Load(" c:\inetpub\wwwr oot\web_viewer_ basic2\imp.rpt" )
crParameterFiel dDefinitions =
myReport.DataDe finition.Parame terFields
crParameterFiel dDefinition =
crParameterFiel dDefinitions.It em("Street Number")
crParameterValu es = crParameterFiel dDefinition.Cur rentValues
crParameterDisc reteValue = New ParameterDiscre teValue()
crParameterDisc reteValue.Value = "*400*" '1st current value
crParameterValu es.Add(crParame terDiscreteValu e)

**Snip, add more paramters. The values are hardcoded right
now.***

Dim crtableLogoninf os As New TableLogOnInfos ()
Dim crtableLogoninf o As New TableLogOnInfo( )
Dim crConnectionInf o As New ConnectionInfo( )
Dim CrTables As Tables
Dim CrTable As Table
Dim TableCounter

With crConnectionInf o
.ServerName = "DATABASE"
.DatabaseName = "dev"
.UserID = "userid"
.Password = password"
End With

**Snip, Loop through and login to all the tables**

CrystalReportVi ewer1.ReportSou rce = myReport
CrystalReportVi ewer1.DataBind( )

End Sub

Can anyone give me some pointers on how to submit the parameters from
another form and pass them through to this form? I also suspect that
my declaration may be in the wrong place in the code.

Thanks,

Chris

[Chris]

Ok, so I set the new window's focus() with Javascript. The new window
still goes to the back with the parent having focus until the actual
page loads (a crystal report). Then the new page gets the focus. I
realize that the parent is submiting back to itself which is why it is
keeping the focus on submit. Is there any way to have the parent just
lose focus the whole time?

cf*****@hotmail .com (Chris) wrote in message news:<d9******* *************** ****@posting.go ogle.com>...

**snip**