pasar parametros a crystal report

[judoka]

hola , aver si alguien sabe como ayudarme-
tengo una reporte que lee datos de una base en oracle, me funciona bien , pero no tengo idea como hacer funcionar una con parametros, es decir necesito algo parcecido a lo qu etengo preo el report qeu estoy llamando tiene dos parametros definidos.

Dim myExportOptions As CrystalDecisions.Shared.ExportOptions
Dim myDiskFileDestinationOptions As CrystalDecisions.Shared.DiskFileDestinationOptions

Dim myExportFile As String
Dim myReport As New ReportDocument
Dim codigo As String
Dim estado As String

myReport.Load("C:\Proyecto IPR\agentes.rpt")

myExportFile = "C:\TEMP\PDF " & Session.SessionID.ToString & ".pdf"

Dim myDBConnectionInfo As New CrystalDecisions.Shared.ConnectionInfo

With myDBConnectionInfo
.ServerName = "orcl1"
.DatabaseName = "orcl1"
.UserID = "nnnn"
.Password = "nnnnn"
End With

myDiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions
myDiskFileDestinationOptions.DiskFileName = myExportFile
myExportOptions = myReport.ExportOptions
With myExportOptions
'.DestinationOptions = myDiskFileDestinationOptions
'.ExportDestinationType = ExportDestinationType.DiskFile
'.ExportFormatType = ExportFormatType.PortableDocFormat
.DestinationOptions = myDiskFileDestinationOptions
.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile
.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat
End With

myReport.Export()

'myReport.RecordSelectionFormula = "{Vw_PatLog.PatAccount} = 'XXXXXXXXXXXX'"
myReport.Refresh()


Dim myTableLogonInfo As New CrystalDecisions.Shared.TableLogOnInfo

Dim myDatabase = myReport.Database
Dim myTables = myDatabase.Tables
Dim myTable As CrystalDecisions.CrystalReports.Engine.Table


For Each myTable In myTables
myTableLogonInfo = myTable.LogOnInfo
myTableLogonInfo.ConnectionInfo = myDBConnectionInfo
myTable.ApplyLogOnInfo(myTableLogonInfo)
Next

Response.ClearContent()
Response.ClearHeaders()
Response.ContentType = "application/pdf"
Response.WriteFile(myExportFile)
Response.Flush()
Response.Close()

System.IO.File.Delete(myExportFile)