Как разделить и объединить PDF документы на C# и .NET
Теперь давайте познакомимся с еще одним преимуществом библиотеки. SautinSoft.PdfMetamorphosis предлагает отличные возможности разделения и объединения PDF-документов.
Полный код
using System;
using System.IO;
using System.Collections;
namespace Sample
{
class Test
{
static void Main(string[] args)
{
// Before starting, we recommend to get a free 100-day key:
// https://sautinsoft.com/start-for-free/
// Apply the key here:
// SautinSoft.PdfMetamorphosis.SetLicense("...");
SautinSoft.PdfMetamorphosis p = new SautinSoft.PdfMetamorphosis();
string rtfPath = @"..\..\..\example.rtf";
string pdfPath = @"..\..\..\test.pdf";
// Let's create a PDF file from RTF file
p.PageSettings.Orientation = SautinSoft.PdfMetamorphosis.PageSetting.Orientations.Landscape;
//Specify page numbers: {1 of N}, font: Verdana, 18
p.PageSettings.Numbering.Text = "{page} of {numpages}";
p.PageSettings.Numbering.FontFace = "Verdana";
p.PageSettings.Numbering.FontSize = 18;
p.RtfToPdfConvertFile(rtfPath, pdfPath);
#region split PDF file
//Split PDF by pages: 1st, 2nd, 3rd ...
p.SplitPDFFileToPDFFolder(pdfPath, Path.GetDirectoryName(pdfPath));
#endregion
#region merge PDF files
//Merge only 1st and 3rd pages
string[] pdfFiles = { @"..\..\..\test-00001.pdf", @"..\..\..\test-00003.pdf" };
p.MergePDFFileArrayToPDFFile(pdfFiles, @"..\..\..\test_Split_and_Merge_1and3page.pdf");
#endregion
//Show merged PDF (it doesn't have 2nd page)
System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(@"..\..\..\test_Split_and_Merge_1and3page.pdf") { UseShellExecute = true });
}
}
}
Imports System.IO
Module sample
Sub Main()
' Before starting, we recommend to get a free 100-day key:
' https://sautinsoft.com/start-for-free/
' Apply the key here:
' SautinSoft.PdfMetamorphosis.SetLicense("...");
Dim p As New SautinSoft.PdfMetamorphosis()
Dim rtfPath As String = "..\..\..\example.rtf"
Dim pdfPath As String = "..\..\..\test.pdf"
' Let's create a PDF file from RTF file
p.PageSettings.Orientation = SautinSoft.PdfMetamorphosis.PageSetting.Orientations.Landscape
'Specify page numbers: {1 of N}, font: Verdana, 18
p.PageSettings.Numbering.Text = "{page} of {numpages}"
p.PageSettings.Numbering.FontFace = "Verdana"
p.PageSettings.Numbering.FontSize = 18
p.RtfToPdfConvertFile(rtfPath, pdfPath)
'Split PDF by pages: 1st, 2nd, 3rd ...
p.SplitPDFFileToPDFFolder(pdfPath, Path.GetDirectoryName(pdfPath))
'Merge only 1st and 3rd pages
Dim pdfFiles() As String = {"..\..\..\test-00001.pdf", "..\..\..\test-00003.pdf"}
p.MergePDFFileArrayToPDFFile(pdfFiles, "..\..\..\test_Split_and_Merge_1and3page.pdf")
'Show merged PDF (it doesn't have 2nd page)
System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo("..\..\..\test_Split_and_Merge_1and3page.pdf") With {.UseShellExecute = True})
End Sub
End Module
Если вам нужен пример кода или у вас есть вопрос: напишите нам по адресу support@sautinsoft.ru или спросите в онлайн-чате (правый нижний угол этой страницы) или используйте форму ниже: