保存为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