用 CrystalReportViewer1 控件在asp.net的网页上显示报表,假设做报表时调用数据表数据的方式调用是能够成功的。但报表是用存储过程获取数据方式会出现下面错误:





找不到表'RptOpenCheck;1' 。 文件 G:\TEMP\FO-OpenCheck {6D191F06-DECF-4A25-88FC-8553E3D435AA}.rpt 内出错: 找不到表。

Error: 未将对象引用设置到对象的实例。

The table 'RptOpenCheck;1' could not be found. Error in File G:\TEMP\FO-OpenCheck {6D191F06-DECF-4A25-88FC-8553E3D435AA}.rpt: The table could not be found.









未能打开该连接。 未能打开该连接。

G:\TEMP\FO-OpenCheck {4E60249E-FC16-4F3D-A610-138FC3297171}.rpt





VS2005 环境,Crsytal Reports 11.5





代码下面:





    Dim crtableLogoninfos As New TableLogOnInfos

    Dim crtableLogoninfo As New TableLogOnInfo

    Dim crConnectionInfo As New ConnectionInfo

    Dim crParameterFields As ParameterFields

    Dim crParameterField As ParameterField

    Dim crParameterValues As ParameterValues

    Dim crParameterDefValues As ParameterValues

    Dim crParameterValue As ParameterValue

    Dim crParameterDiscreteValue As ParameterDiscreteValue





    Dim CrTables As Tables

    Dim CrTable As Table





    Dim ReportName As String

    Dim PrintTo As String       ' P Printer V Window

    Dim ReportPath As String

    Dim UserName As String

    Dim Password As String

    Dim ServerName As String

    Dim DatabaseName As String

    Dim crReportDocument As New ReportDocument









Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load, Me.Load





    Dim strParam As String = Request("p")





'获取用户请求參数

    If Right(strParam, 1) = "~" Then

        strParam = Mid(strParam, 1, Len(strParam) - 1)

    End If





'參数转换为数组

    s = Split(strParam, "~")





    'use odbc connection database 

    With crConnectionInfo

        .AllowCustomConnection = True

        .ServerName = ”ODBCName"

        '.DatabaseName = "TempDB"

        .UserID = "sa"

        .Password = "Microwin"

    End With





    ''use SQL connection database 

    'With crConnectionInfo

    '    .AllowCustomConnection = True

    '    .ServerName = "(local)"

    '    .DatabaseName = "TempDB"

    '    .UserID = "sa"

    '    .Password = "Microwin"

    'End With

    

    '指定报表路径

    ReportPath = Server.MapPath(Request.ApplicationPath)

    ReportNamePath = ReportPath & "\testing.rpt"





    'check report file exists and Load Report

    If System.IO.File.Exists(ReportNamePath) Then

        crReportDocument.Load(ReportNamePath)

    End If

    

    '设置报表文档给报表控件

    Me.CrystalReportViewer1.ReportSource = crReportDocument



'设置连接数据库信息给报表文档

    CrTables = crReportDocument.Database.Tables

    For Each CrTable In CrTables





        crtableLogoninfo = CrTable.LogOnInfo

        crtableLogoninfo.ConnectionInfo = crConnectionInfo

        CrTable.ApplyLogOnInfo(crtableLogoninfo)





'就是这句没有加,所以会出现以上错误信息。仅仅有报表是调用存储过程取数据时才会出现错误。花了我几天时间,最终攻克了。

CrTable.Location = CrTable.Name

    Next





'设置控件显示的属性

    With CrystalReportViewer1





        .AutoDataBind = True

        .ReuseParameterValuesOnRefresh = True

        .EnableDatabaseLogonPrompt = False

        .EnableParameterPrompt = False





        CrystalReportViewer1.DisplayGroupTree = False

        CrystalReportViewer1.DisplayPage = True

        CrystalReportViewer1.DisplayToolbar = True

        CrystalReportViewer1.ReportSource = crReportDocument





    End With





    If Not IsPostBack Then





'取用户请求的參数赋值给报表。假设报表须要參数的话。从第三个元素開始为报表參数值。





        crParameterFields = Nothing

        crParameterFields = CrystalReportViewer1.ParameterFieldInfo





        Dim j As Integer = UBound(s, 1)



        For i = 0 To crParameterFields.Count - 1

            crParameterField = crParameterFields.Item(i)





            crParameterValues = crParameterField.CurrentValues





            crParameterDefValues = Nothing

            crParameterDefValues = New ParameterValues

            crParameterDefValues = crParameterField.DefaultValues





            crParameterDiscreteValue = Nothing

            crParameterDiscreteValue = New ParameterDiscreteValue





            If i > (j - 2) Then





                Select Case crParameterField.ParameterValueKind

                    Case ParameterValueKind.BooleanParameter

                        crParameterDiscreteValue.Value = False

                    Case ParameterValueKind.CurrencyParameter

                        crParameterDiscreteValue.Value = Nothing

                    Case ParameterValueKind.DateParameter

                        crParameterDiscreteValue.Value = System.DateTime.Now

                    Case ParameterValueKind.DateTimeParameter

                        crParameterDiscreteValue.Value = System.DateTime.Now

                    Case ParameterValueKind.NumberParameter

                        crParameterDiscreteValue.Value = Nothing

                    Case ParameterValueKind.StringParameter

                        crParameterDiscreteValue.Value = " "

                    Case ParameterValueKind.TimeParameter

                        crParameterDiscreteValue.Value = System.DateTime.Now

                End Select





                crParameterValues.Add(crParameterDiscreteValue)





            Else





                Select Case crParameterField.ParameterValueKind

                    Case ParameterValueKind.BooleanParameter

                        crParameterDiscreteValue.Value = IIf(s(i + 2) = "0", False, True)

                    Case ParameterValueKind.CurrencyParameter

                        crParameterDiscreteValue.Value = IIf(Trim(s(i + 2) & "") = "", Nothing, s(i + 2))

                    Case ParameterValueKind.DateParameter

                        crParameterDiscreteValue.Value = IIf(Trim(s(i + 2) & "") = "", Nothing, s(i + 2))

                    Case ParameterValueKind.DateTimeParameter

                        crParameterDiscreteValue.Value = IIf(Trim(s(i + 2) & "") = "", Nothing, s(i + 2))

                    Case ParameterValueKind.NumberParameter

                        crParameterDiscreteValue.Value = IIf(Trim(s(i + 2) & "") = "", Nothing, s(i + 2))

                    Case ParameterValueKind.StringParameter

                        crParameterDiscreteValue.Value = IIf(Trim(s(i + 2) & "") = "", " ", s(i + 2))

                    Case ParameterValueKind.TimeParameter

                        crParameterDiscreteValue.Value = IIf(Trim(s(i + 2) & "") = "", Nothing, s(i + 2))

                End Select





                crParameterValues.Add(crParameterDiscreteValue)

            End If





        Next









    End If

    

End Sub

水晶报表 Crystal Report 调用存储过程时出错 找不到表 ,解决方法。的更多相关文章

  1. Visual Studio 2012使用水晶报表Crystal Report

    原文:Visual Studio 2012使用水晶报表Crystal Report SAP在 2013年1月14日 released SAP Crystal Reports,developer ver ...

  2. 如何将水晶报表(Crystal Report)导入葡萄城报表

    当从旧的报表平台迁移到葡萄城报表工具时,意味着有大量的报表设计工作要重复去做,如果有一款工具能够在这些工具之间进行自由转换,就能省去报表开发几乎一半的工作量. 葡萄城报表为兼容其他报表控件,提供了简单 ...

  3. 用C#调用C++DLL提示找不到DLL解决方法【转】

    用C#调用自己写的C++ DLL(x64),总是提示找不到DLL,调试可以,发布release老是提示找不到DLL(dll文件确定存在) 原因:Visual C++的DLL分发方式没选:调试默认选择: ...

  4. 部署包含水晶报表Crystal Reports 的VS.NET2005应用程序[原创]

    要部署包含水晶报表Crystal Reports 的应用程序,您需要在生成解决方案之前创建一个安装项目,并且向应用程序中添加必要的合并模块. 1.打开 VS.NET2005 编程IDE. 2.在解决方 ...

  5. SQL SERVER使用ODBC 驱动建立的链接服务器调用存储过程时参数不能为NULL值

    我们知道SQL SERVER建立链接服务器(Linked Server)可以选择的驱动程序非常多,最近发现使用ODBC 的 Microsoft OLE DB 驱动程序建立的链接服务器(Linked S ...

  6. EF 6 调用存储过程时返回多结果集和OUTPUT参数问题

    原文地址:http://q.cnblogs.com/q/56836/ 各位大侠,提问一个关于EF6调用存储过程时返回多结果集和OUTPUT参数问题 目前已经可以调用存储过程并且可以返回多个结果集. 但 ...

  7. 报表学习总结(一)——ASP.NET 水晶报表(Crystal Reports)的简单使用

    一.水晶报表简介 Crystal Reports(水晶报表)是一款商务智能(BI)软件,主要用于设计及产生报表.水晶报表是业内最专业.功能最强的报表系统,它除了强大的报表功能外.最大的优势是实现了与绝 ...

  8. (转)创建DB2实例时出错,请大家帮忙解决

    创建DB2实例时出错,请大家帮忙解决 原文:http://bbs.chinaunix.net/thread-3601748-1-1.html 运行:$DB2DIR/instance/db2icrt   ...

  9. 架设传奇时打开DBC数据库出错或读取DBC失败解决方法

    架设传奇时打开DBC数据库出错或读取DBC失败解决方法 DBC右键-属性-高级-管理员身份运行 即可

随机推荐

  1. 04C#运算符

    C#运算符 运算符分类 与C语言一样,如果按照运算符所作用的操作数个数来分,C#语言的运算符可以分为以下几种类型: l  一元运算符:一元运算符作用于一个操作数,例如:-X.++X.X--等. l  ...

  2. VSCODE插件开发:用户输入输出

    阅读这篇文章之前,假设你已经具有开发helloworld的插件的能力. vscode.window 简介 vscode.window 负责当前激活窗口的输入输出,比如展示信息,和用户输入等功能都是用v ...

  3. 指定PING的网卡

    struct ifreq ifr; // 绑定在eth0上 memset( &ifr, , sizeof( struct ifreq ) ); snprintf( ifr.ifr_name, ...

  4. WinMain名词解析

    WinMain程序名词解析 int WINAPI WinMain(HINSTANCE hInstance ,HINSTANCE hPrevInstance,LPSTR lpCmdLine,int nS ...

  5. 集训第四周(高效算法设计)I题 (贪心)

    Description Shaass has n books. He wants to make a bookshelf for all his books. He wants the bookshe ...

  6. nodejs的express框架创建https服务器

    一 openssl创建https私钥和证书 1.下载windows版openssl: http://slproweb.com/products/Win32OpenSSL.html Win64OpenS ...

  7. 【转】SQLServer连接字符串配置:MultipleActiveResultSets

    ADO.NET 1.x 利用SqlDataReader读取数据,针对每个结果集需要一个独立的连接.当然,你还必须管理这些连接并且要付出相应的内存和潜在的应用程序中的高度拥挤的瓶颈代价-特别是在数据集中 ...

  8. BNUOJ 2947 Buy Tickets

    Buy Tickets Time Limit: 4000ms Memory Limit: 65536KB This problem will be judged on PKU. Original ID ...

  9. hihoCoder#1042 跑马圈地

    原题地址 经网友jokeren提醒,后面给出的代码虽然可以AC原题,但存在bug,主要是在矩形覆盖情况的判断上处理的不够完全. 看似挺复杂的,但是仔细分析一下可以化简: 首先,不用枚举周长,因为更长的 ...

  10. 【状压+状态转移】A Famous Airport Managere

    https://www.bnuoj.com/v3/problem_show.php?pid=25653 [题意] 给定一个3*3的九宫格,模拟一个停机坪.第一个格子一定是'*',代表take off ...