PDF文件包(Portfolio)允许用户将多种不同类型的文件如Word、Excel、PDF、PowerPoint和图片等集合到一个PDF文件中,用户可以打开、更改PDF文件包中的单个文件。添加文件包时,可支持创建文件包时并直接将文件添加到文件包;或者创建文件包的同时创建文件夹,并将文件添加到文件夹。
环境准备:程序中需要使用到PDF类库工具(Spire.PDF for .NET hotfix 6.5.15及以上版本)下载后,解压,将Bin文件夹下的dll文件添加引用到VS程序。如下效果:
1. 创建文件包时直接添加文件
C#
using Spire.Pdf;using System;namespace CreatePDFPortfolio_PDF{ class Program { static void Main(string[] args) { //创建数组 String[] files = new String[] { "sample.pdf", "sample.docx", "sample.xlsx", "sample.txt", "sample.pptx" }; //创建PdfDocument实例 PdfDocument pdf = new PdfDocument(); pdf.LoadFromFile("test.pdf"); //创建PDF文件包并添加文件 for (int i = 0; i < files.Length; i++) { pdf.Collection.AddFile(files[i]); } //保存文档 pdf.SaveToFile("PortfolioWithFiles.pdf", FileFormat.PDF); System.Diagnostics.Process.Start("PortfolioWithFiles.pdf"); } }}
VB.NET
Imports Spire.PdfNamespace CreatePDFPortfolio_PDF Class Program Private Shared Sub Main(args As String()) '创建数组 Dim files As [String]() = New [String]() {"sample.pdf", "sample.docx", "sample.xlsx", "sample.txt", "sample.pptx"} '创建PdfDocument实例 Dim pdf As New PdfDocument() pdf.LoadFromFile("test.pdf") '创建PDF文件包并添加文件 For i As Integer = 0 To files.Length - 1 pdf.Collection.AddFile(files(i)) Next '保存文档 pdf.SaveToFile("PortfolioWithFiles.pdf", FileFormat.PDF) System.Diagnostics.Process.Start("PortfolioWithFiles.pdf") End Sub End ClassEnd Namespace
2. 创建文件包时创建文件夹,并将文件添加到文件夹
C#
using Spire.Pdf;using Spire.Pdf.Collections;using System;namespace CreatePDFPortfolio2{ class Program { static void Main(string[] args) { //创建数组 String[] files = new String[] { "sample.pdf", "sample.docx", "sample.xlsx", "sample.txt", "sample.pptx" }; //创建PdfDocument实例 PdfDocument doc = new PdfDocument(); //创建PDF文件包,添加文件夹,并向文件夹添加文件 for (int i = 0; i < files.Length; i++) { PdfFolder folder = doc.Collection.Folders.CreateSubfolder("Folder" + i); folder.AddFile(files[i]); } //保存文档 doc.SaveToFile("PortfolioWithFolders2.pdf", FileFormat.PDF); System.Diagnostics.Process.Start("PortfolioWithFolders2.pdf"); } }}
VB.NET
Imports Spire.PdfImports Spire.Pdf.CollectionsNamespace CreatePDFPortfolio2 Class Program Private Shared Sub Main(args As String()) '创建数组 Dim files As [String]() = New [String]() {"sample.pdf", "sample.docx", "sample.xlsx", "sample.txt", "sample.pptx"} '创建PdfDocument实例 Dim doc As New PdfDocument() '创建PDF文件包,添加文件夹,并向文件夹添加文件 For i As Integer = 0 To files.Length - 1 Dim folder As PdfFolder = doc.Collection.Folders.CreateSubfolder("Folder" + i) folder.AddFile(files(i)) Next '保存文档 doc.SaveToFile("PortfolioWithFolders2.pdf", FileFormat.PDF) System.Diagnostics.Process.Start("PortfolioWithFolders2.pdf") End Sub End ClassEnd Namespace
(完)
C#/VB.NET 在PDF中添加文件包(Portfolio)shirley、 bestbuy、 雨果网、 海关调整193个HS编码监管要求,不再实施商品检验,2月1日起实施、 速卖通店铺运营各种疑难杂症解答、 阿里巴巴网交会开幕,6000场直播带全球批发商看中国工厂、 张家界游花多少钱、 张家界游花多少钱、 张家界游花多少钱、
没有评论:
发表评论