How to Pass Multi Parameter to Crystal Report

[Kosal]

Dear Sir/Madam

I would like you to help give me the an example pass multi parameter to crystal report.

thanks
Best Regard
Kosal

[Dököll]

Hey there Partner!

This may be what you need:

[CODE=VB]

Dim oCrystalApp As CRAXDRT.applica tion

Dim oCrystalReport As CRAXDRT.Report

Dim oCrystalParamet ers As CRAXDRT.Paramet erFieldDefiniti ons

Dim oCrystalParamet er As CRAXDRT.Paramet erFieldDefiniti on



' Open the report

Public Sub OpenReport(cRep ortName as string)

Set oCrystalReport = oCrystalApp.Ope nReport(cReport Name, crOpenReportByT empCopy)

Set oCrystalParamet ers = oCrystalReport. ParameterFields

End Sub



'Set Parameters

Public Sub SetParameter(cP armName as string, cParmValue as string)

For Each oCrystalParamet er In oCrystalParamet ers

If oCrystalParamet er.Name = cParmName Then

Select Case oCrystalParamet er.ValueType

Case crDateField, crDateTimeField , crDateField

oCrystalParamet er.SetCurrentVa lue CDate(cParmValu e)

Case crNumberField

oCrystalParamet er.SetCurrentVa lue Val(cParmValue)

Case Else

oCrystalParamet er.SetCurrentVa lue cParmValue & ""

End Select

End If

Next oCrystalParamet er

End Sub
[/CODE]

Have a look here if not helpful:

http://www.google.com/search?hl=en&rls=com.microsoft%3Aen-US&q=How+to+Pass+Multi+Parameter+to+Crystal+Report+in+vb6&btnG=Search

Let us know if anything worked...