我试图使用vb.net生成水晶报告 [英] I m trying to generate crystal report using vb.net

查看:131
本文介绍了我试图使用vb.net生成水晶报告的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

我正在尝试使用vb.net生成水晶报告并且报告显示空白我的代码在下面

I m trying to generate crystal report using vb.net and report is showing blank my code is below

 Dim cryRpt As New ReportDocument
        cryRpt.Load(Application.StartupPath & "\Reports\Brooker Reports\rptfwisesrpt.rpt")
        Dim crParameterFieldDefinitions As ParameterFieldDefinitions
        Dim crParameterFieldDefinition As ParameterFieldDefinition
        Dim crParameterValues As New ParameterValues
        Dim crParameterDiscreteValue As New ParameterDiscreteValue
        crParameterDiscreteValue.Value = frmbsrc.cmbbroker.Text
        crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields()
        crParameterFieldDefinition = _
        crParameterFieldDefinitions.Item("b_name")
20:
        crParameterValues = crParameterFieldDefinition.CurrentValues
21:

22:
        crParameterValues.Clear()
23:
        crParameterValues.Add(crParameterDiscreteValue)
24:
25:
        crParameterFieldDefinition.ApplyCurrentValues(crParameterValues)
27:
        Dim tbCurrent As CrystalDecisions.CrystalReports.Engine.Table
28:
        Dim tliCurrent As CrystalDecisions.Shared.TableLogOnInfo
29:

30:
        For Each tbCurrent In cryRpt.Database.Tables
31:
            tliCurrent = tbCurrent.LogOnInfo
32:
            With tliCurrent.ConnectionInfo
33:
                .ServerName = ".\SQLExpress"
34:
                .UserID = "sa"
35:
                .Password = "information31"
36:
                .DatabaseName = "PMS"
37:
            End With
38:
            tbCurrent.ApplyLogOnInfo(tliCurrent)
39:
        Next tbCurrent
40:
41:
        CrystalReportViewer1.ReportSource = cryRpt
42:
        CrystalReportViewer1.Refresh()

推荐答案

Go trough the link



http://www.aspdotnet-suresh.com/2014/12/crystal-reports-example-in-aspnet-using-dataset-datatable-in-csharp.html [ ^ ]


这篇关于我试图使用vb.net生成水晶报告的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆