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 = ; 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.Pdf

Namespace 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 =  To files.Length - 

                pdf.Collection.AddFile(files(i))

            Next

            '儲存檔案

            pdf.SaveToFile("PortfolioWithFiles.pdf", FileFormat.PDF)

            System.Diagnostics.Process.Start("PortfolioWithFiles.pdf")

        End Sub

    End Class

End 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 = ; 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.Pdf

Imports Spire.Pdf.Collections

Namespace 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 =  To files.Length -

                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 Class

End Namespace

（完）