保存为PDF文件

提示:此功能需要安装Office 2007或更高的版本。

为了避免用户修改生成好的Excel报表,我们可以将报表保存为PDF文件再打开,例如:

Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim
fl As String = ProjectPath & "Reports\出库单.pdf"
Book
.Build() '生成细节区
Book
.SaveToPDF(fl) '保存为PDF文件
Dim
Proc As New Process '打开PDF文件
Proc
.File = fl
Proc
.Start()

提示:为了能打开生成的PDF文件,请先安装PDF阅读软件,例如:Adobe Reader X


本页地址:http://www.foxtable.com/webhelp/topics/2930.htm