佳礼资讯网

 找回密码
 注册

ADVERTISEMENT

查看: 775|回复: 5

帮我抓虫, 先谢过各位大虾

[复制链接]
发表于 17-8-2006 10:07 AM | 显示全部楼层 |阅读模式
DBConnection.Open()
        SQLstring = "SELECT * FROM AdminConfig"

        DBCommand = New OleDbCommand(SQLstring, DBConnection)
        DBAdapter = New OleDbDataAdapter
        DBAdapter.SelectCommand = DBCommand
        DBAdapter.Fill(myDS, "AdminConfig")
        DBConnection.Close()

        Dim rpt As New CrystalReport1
        rpt.SetDataSource(myDS)

        Dim crReportDocument As CrystalReport1
        crReportDocument = New CrystalReport1
        Dim crExportOptions As ExportOptions
        Dim crDiskFileDestinationOptions As DiskFileDestinationOptions
        Dim Fname As String
        Fname = Server.MapPath(".") & "\Upload\Output.pdf"

        crDiskFileDestinationOptions = New DiskFileDestinationOptions
        crDiskFileDestinationOptions.DiskFileName = Fname
        crExportOptions = crReportDocument.ExportOptions
        crExportOptions.DestinationOptions = crDiskFileDestinationOptions
        crExportOptions.ExportDestinationType = ExportDestinationType.DiskFile
        crExportOptions.ExportFormatType = ExportFormatType.PortableDocFormat
        crReportDocument.SetDataSource(myDS.Tables("AdminConfig"))
        crReportDocument.SetDatabaseLogon("", "")

        With crReportDocument.FormatEngine.PrintOptions
            .PaperSize = PaperSize.PaperLetter
            .PaperOrientation = PaperOrientation.DefaultPaperOrientation
        End With

        Try
            crReportDocument.Export()
        Catch Excep As Exception
            Response.Write(Excep.Message.ToString)
        End Try
回复

使用道具 举报


ADVERTISEMENT

 楼主| 发表于 17-8-2006 10:11 AM | 显示全部楼层
Error Message: Logon failed.

我用dataset,为什么需要Logon database?

我相信我的dataset是成功绑到资料的,因为我用myDS.WriteXml() 测试.
回复

使用道具 举报

发表于 17-8-2006 10:21 AM | 显示全部楼层
帮我抓虫, 先谢过各位大虾
原帖由 笨陈 于 17-8-2006 10:07 AM 发表
DBConnection.Open()
        SQLstring = "SELECT * FROM AdminConfig"

        DBCommand = New OleDbCommand(SQLstring, DBConnection)
        DBAdapter = New OleDbDataAdapter
        DB ...

:@你把这里的人当作海产?:@

要求帮忙之前请尊重这里的人
回复

使用道具 举报

 楼主| 发表于 17-8-2006 10:32 AM | 显示全部楼层
原帖由 max5007 于 17-8-2006 10:21 AM 发表

:@你把这里的人当作海产?:@

要求帮忙之前请尊重这里的人



我尊重您, 您应该很少上其它中文论坛吧? 连基本的火星语都不会
大虾 = 大侠 = 高手
回复

使用道具 举报

发表于 17-8-2006 11:59 AM | 显示全部楼层
原帖由 笨陈 于 17-8-2006 10:32 AM 发表



我尊重您, 您应该很少上其它中文论坛吧? 连基本的火星语都不会
大虾 = 大侠 = 高手


原来如此。。
对。。我对于砭人的词汇很敏感

[ 本帖最后由 max5007 于 17-8-2006 12:03 PM 编辑 ]
回复

使用道具 举报

发表于 17-8-2006 05:48 PM | 显示全部楼层
原帖由 笨陈 于 17-8-2006 10:11 AM 发表
Error Message: Logon failed.

我用dataset,为什么需要Logon database?

我相信我的dataset是成功绑到资料的,因为我用myDS.WriteXml() 测试.


你用 dataset, 但你的 dataset 资料是从 database 而来...
错误讯息既然是 logon fail, 那么应该是你的 DBConnection 有问题.
回复

使用道具 举报

Follow Us
您需要登录后才可以回帖 登录 | 注册

本版积分规则

 

ADVERTISEMENT



ADVERTISEMENT



ADVERTISEMENT

ADVERTISEMENT


版权所有 © 1996-2023 Cari Internet Sdn Bhd (483575-W)|IPSERVERONE 提供云主机|广告刊登|关于我们|私隐权|免控|投诉|联络|脸书|佳礼资讯网

GMT+8, 12-11-2024 05:56 AM , Processed in 0.108981 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表