2011-03-16 121 views
1

我工作视觉标准输入输出2008(vb.net)和SQL Server 2008 我正在研究9传递参数到晶体报告窗口形式(vb.net)

我已经在创建了一个存储过程晶体报告SQL Server的 我在水晶报表数据专家加入此过程

现在 我只是想传递一个参数到水晶报表 这样它会告诉我在水晶报表数据

请帮我

回答

1
Dim myParameterFields As ParameterFields 
Dim myParameterField As ParameterField 
Dim myDiscreteValue As ParameterDiscreteValue 

myParameterFields = New ParameterFields 
myParameterField = New ParameterField 
myDiscreteValue = New ParameterDiscreteValue 

myParameterField.ParameterFieldName = "@Date" 
myDiscreteValue.Value = cj 
myParameterField.CurrentValues.Add(myDiscreteValue) 

myParameterFields.Add(myParameterField) 

myParameterField = New ParameterField 
myDiscreteValue = New ParameterDiscreteValue 

CrystalReportViewer1.ParameterFieldInfo = myParameterFields 

CrystalReportViewer1.Refresh() 
CrystalReportViewer1.ReportSource = "D:\YOGESH KA PROJECT\stationary\stationary\Forms\BillReport.rpt" ' Assign Report Source to CRV 
1

试试这个:

Dim paramDV As New ParameterDiscreteValue() 
paramDV.Value = "Parameter Value" 
report.ParameterFields("@ParameterName").CurrentValues.Clear() 
report.ParameterFields("@ParameterName").DefaultValues.Clear() 
report.ParameterFields("@ParameterName").CurrentValues.Add(paramDV) 

其中report是你的水晶报表对象

+0

这段代码是C调,我想vb.net代码 – CHANDRAHAS 2011-03-16 09:27:53

+0

@CHANDRAHAS - 转换为VB.NET ... 。 – codingbadger 2011-03-16 09:29:58

+0

我转换它不是woking bro – CHANDRAHAS 2011-03-16 09:40:08