Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在ASP.NET上使用Crystal报表生成报表_Asp.net_Vb.net_Crystal Reports - Fatal编程技术网

在ASP.NET上使用Crystal报表生成报表

在ASP.NET上使用Crystal报表生成报表,asp.net,vb.net,crystal-reports,Asp.net,Vb.net,Crystal Reports,在为旅行社预订机票后,我想使用Crystal report生成一份可打印报告 我正在寻找一种方法来做到这一点 有视频教程之类的吗?就是这样 在ASP.NET中使用多个表创建Crystal报表: 将Crystal报告导出为不同的文件格式: Imports CrystalDecisions Imports CrystalDecisions.CrystalReports Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDe

在为旅行社预订机票后,我想使用
Crystal report
生成一份
可打印报告

我正在寻找一种方法来做到这一点

有视频教程之类的吗?

就是这样

在ASP.NET中使用多个表创建Crystal报表:

将Crystal报告导出为不同的文件格式:

Imports CrystalDecisions
Imports CrystalDecisions.CrystalReports
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.IO

Public Class _Default
    Inherits System.Web.UI.Page

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

    End Sub

    Protected Sub LinkButton1_Click(sender As Object, e As EventArgs) Handles LinkButton1.Click

        OpenPDF(Request.ApplicationPath + "/Reports/Report.pdf")

    End Sub


    Private Sub OpenPDF(downloadAsFilename As String)
        Dim RptDoc As New ReportDocument()
        RptDoc.Load(Server.MapPath(Request.ApplicationPath + "/Reports/myreport.rpt"))
        RptDoc.SetDatabaseLogon("user", "password", "server", "database")

        Dim stream As New BinaryReader(RptDoc.ExportToStream(CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat))
        Response.ClearContent()
        Response.ClearHeaders()
        Response.ContentType = "application/pdf"
        Response.AddHeader("content-disposition", Convert.ToString("attachment; filename=") & downloadAsFilename)
        Response.AddHeader("content-length", stream.BaseStream.Length.ToString())
        Response.BinaryWrite(stream.ReadBytes(Convert.ToInt32(stream.BaseStream.Length)))
        Response.Flush()
        Response.Close()
    End Sub
End Class