Sir
 I am using vb.net and crystal report . I want to pass one text (say company name) directly to report (not through any database field)
Could you please tell me how it is possible

U can solve it by using two methods.
1)Using Parameter Field.Add new parameter to report and set its value to
text(company name) in your report viewer containing file(.vb).
2)Using Report Title.Set value which you want to display on report to that parameter in your code behind .vb page on which report viewer is located.
In this way u can assign default value as well as value which can be dynamically changed.

You can programmatically pass parameter values into your Crystal Report using VB.NET code similar to this:
    Imports CrystalDecisions.CrystalReports.Engine
    Imports CrystalDecisions.Shared
    '
    ' Load the selected report file.
    '
    Dim CR As New ReportDocument
    CR.Load(strReportPath)
    '
    ' Declare the parameter related objects.
    '
    Dim crParameterDiscreteValue As ParameterDiscreteValue
    Dim crParameterFieldDefinitions As ParameterFieldDefinitions
    Dim crParameterFieldLocation As ParameterFieldDefinition
    Dim crParameterValues As ParameterValues
    '
    ' Get the report's parameters collection.
    '
    crParameterFieldDefinitions = CR.DataDefinition.ParameterFields
    '
    ' Set the first parameter
    ' - Get the parameter, tell it to use the current values vs default value.
    ' - Tell it the parameter contains 1 discrete value vs multiple values.
    ' - Set the parameter's value.
    ' - Add it and apply it.
    ' - Repeat these statements for each parameter.
    '
    crParameterFieldLocation = crParameterFieldDefinitions.Item("StartDate")
    crParameterValues = crParameterFieldLocation.CurrentValues
    crParameterDiscreteValue = New CrystalDecisions.Shared.ParameterDiscreteValue
    crParameterDiscreteValue.Value = strStartDate
    crParameterValues.Add(crParameterDiscreteValue)
    crParameterFieldLocation.ApplyCurrentValues(crPara meterValues)
    '
    ' Set the Crytal Report Viewer control's source to the report document.
    '
    CrystalReportViewer.ReportSource = CR
If your report's DataSource is a .NET DLL DO NOT set the ReportDocument's DataSource property programatically as in the code below. However, if the DataSource is an XML Schema (.xsd) file you must set it prior to setting your parameters.
    cr.SetDataSource(DS.Tables("Customer"))
If your report's DataSource is a .NET DLL as shown here and the public functions that return the datatables available to your report where changed to require parameters, as illustrated below, the parameters can be set as just described.
    Public Function Customers(theStartDate As String) As DataTable
If the parameters were added to your Crystal Report by clicking the Parameter Fields node in the Crystal IDE's Field Explorer they can be set using the following code:
    Dim cr As New ReportDocument
    cr.Load(strReportPath)
    cr.SetDataSource(DS.Tables("Customers"))
    cr.SetParameterValue("StartDate", strMyParmValue)
    CrystalReportViewer.ReportSource = cr

hi,

i'm a CR noobie here, still don't understand about this:
crParameterFieldDefinitions.Item("StartDate")

How am I going to set the field in the CR having StartDate?
I inserted a Text Object in CR, i input with text; StartDate or even tried to change the name for the Text Object as StartDate, also will get the Invalid field error after Build.

do i need to include special character like {}, []; eg. {StartDate} in the CR, but even so the VS.NET still have build error 'coz it couldn't find the StartDate field in the CR still. - I have set the connection path as CR.Load(Server.MapPath("form1.rpt")), where form1.rpt resides in the root folder of my Application, anything wrong here? (doesn't have any build error)

I'm using VS2003.NET & CR 9.1.5


Any advice

After explore more into CR.NET, i insert a New parameter field from field explorer this time instead of text object used previously.

I've set Name as StartDate, value type as String, Checked discrete value. Then i click ok & drag drop the field into the report. After I saved this form1.rpt & do a Build, there's this error:

Exception Details: CrystalDecisions.CrystalReports.Engine.ParameterFi eldCurrentValueException: Missing parameter field current value.


how could i set current value to the parameter field i created? or maybe the whole steps r wrong? Pls kindly advice.

after bashing head on walls numerous times, i've found out the reason why i couldn't pass the value to CR

in case you'll like to know, it's due to wrong declartion for my reportdocument. :D

Hi 2 power ,
Tyr this .and let me know if it works...
Abc is the name of the parameter you created on your CR.
and on your CR you need to set the value for the parameter field in select expert
ABC = {?ABC}
Try n see if this works.otherwise let me know.

************************************************** **************
Dim param1Fields As New CrystalDecisions.Shared.ParameterFields()
Dim param1Field As New CrystalDecisions.Shared.ParameterField()
Dim param1Range As New CrystalDecisions.Shared.ParameterDiscreteValue()
            param1Field.ParameterFieldName = "ABC"
            param1Range.Value = 1
            param1Field.CurrentValues.Add(param1Range)
            param1Fields.Add(param1Field)
            CrystalReportViewer1.ParameterFieldInfo = param1Fields
Dim rpt As New CrystalDecisions.CrystalReports.Engine.ReportDocum ent()
CrystalReportViewer1.ReportSource = new() YOUR REPORT NAME()
            CrystalReportViewer1.Refresh()

Hello,

I am so stuck here. I have used the following code. The problem is when I run the program it always prompt me to enter the "Parameter Value" eventhough I passed through my VB.Net application and I don't want that. When I pass value on that windows it grabs the data as per passed value. It doesn't allow me to pass value through programatically.

Please help me in this case. Your help is so appreciated.

************************************************** **************
Dim param1Fields As New CrystalDecisions.Shared.ParameterFields()
Dim param1Field As New CrystalDecisions.Shared.ParameterField()
Dim param1Range As New CrystalDecisions.Shared.ParameterDiscreteValue()
param1Field.ParameterFieldName = "ABC"
param1Range.Value = "any value"
param1Field.CurrentValues.Add(param1Range)
param1Fields.Add(param1Field)
CrystalReportViewer1.ParameterFieldInfo = param1Fields

Dim rpt As New CrystalDecisions.CrystalReports.Engine.ReportDocum ent()
CrystalReportViewer1.ReportSource = new() YOUR REPORT NAME()
CrystalReportViewer1.Refresh()

Hi,

In Windows application refresh() method is not required. Replace last 3 lines with this below code.

Dim rpt As New YOUR REPORT NAME
CrystalReportViewer1.ReportSource = rpt

Simpy removing the refresh method call solved the problem