下面的示例將演示如何使用XtraReport將報表導出為HTML，首先需要在項目中添加一個新的報表(XtraReport1)，并將報表控件拖放在項目中，然后執行下面的代碼。

C#

using System.Drawing;

using System.Diagnostics;

using DevExpress.XtraPrinting;

using DevExpress.XtraReports.UI;

// ...

private void button1_Click(object sender, EventArgs e)

{

// A path to export a report.

string reportPath = "c:\\Test.html";

// Create a report instance.

XtraReport1 report = new XtraReport1();

// Get its HTML export options.

HtmlExportOptions htmlOptions = report.ExportOptions.Html;

// Set HTML-specific export options.

htmlOptions.CharacterSet = "UTF-8";

htmlOptions.RemoveSecondarySymbols = false;

htmlOptions.Title = "Test Title";

// Set the pages to be exported, and page-by-page options.

htmlOptions.ExportMode = HtmlExportMode.SingleFilePageByPage;

htmlOptions.PageRange = "1, 3-5";

htmlOptions.PageBorderColor = Color.Blue;

htmlOptions.PageBorderWidth = 3;

// Export the report to HTML.

report.ExportToHtml(reportPath);

// Show the result.

StartProcess(reportPath);

}

// Use this method if you want to automaically open

// the created HTML file in the default program.

public void StartProcess(string path)

{

Process process = new Process();

try

{

process.StartInfo.FileName = path;

process.Start();

process.WaitForInputIdle();

}

catch { }

}

VB

Imports System.Drawing

Imports System.Diagnostics

Imports DevExpress.XtraPrinting

Imports DevExpress.XtraReports.UI

' ...

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _

Handles Button1.Click

' A path to export a report.

Dim reportPath As String = "c:\\Test.html"

' Create a report instance.

Dim report As New XtraReport1()

' Get its HTML export options.

Dim htmlOptions As HtmlExportOptions = report.ExportOptions.Html

' Set HTML-specific export options.

htmlOptions.CharacterSet = "UTF-8"

htmlOptions.RemoveSecondarySymbols = False

htmlOptions.Title = "Test Title"

' Set the pages to be exported, and page-by-page options.

htmlOptions.ExportMode = HtmlExportMode.SingleFilePageByPage

htmlOptions.PageRange = "1, 3-5"

htmlOptions.PageBorderColor = Color.Blue

htmlOptions.PageBorderWidth = 3

' Export the report to HTML.

report.ExportToHtml(reportPath)

' Show the result.

StartProcess(reportPath)

End Sub

' Use this method if you want to automaically open

' the created HTML file in the default program.

Public Sub StartProcess(ByVal path As String)

Dim process As New Process()

Try

process.StartInfo.FileName = path

process.Start()

process.WaitForInputIdle()

Catch

End Try

End Sub

標簽：

本站文章除注明轉載外，均為本站原創或翻譯。歡迎任何形式的轉載，但請務必注明出處、不得修改原文相關鏈接，如果存在內容上的異議請郵件反饋至hey@evget.com

文章轉載自：慧都控件網

總結

以上是生活随笔為你收集整理的如何将html转为report,如何使用XtraReport将报表导出为HTML的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。