Load a document and save all pages as separate PDF documents.
Полный код
using System.IO;
using SautinSoft.Document;
namespace Example
{
class Program
{
static void Main(string[] args)
{
// Get your free 100-day key here:
// https://sautinsoft.com/start-for-free/
SeparateDocumentToPdfPages();
}
/// <summary>
/// Load a document and save all pages as separate PDF documents.
/// </summary>
/// <remarks>
/// Details: https://sautinsoft.com/products/document/help/net/developer-guide/pagination-save-document-pages-as-pdf-net-csharp-vb.php
/// </remarks>
static void SeparateDocumentToPdfPages()
{
string filePath = @"..\..\..\example.docx";
DocumentCore dc = DocumentCore.Load(filePath);
string folderPath = Path.GetFullPath(@"Result-files");
DocumentPaginator dp = dc.GetPaginator();
for (int i = 0; i < dp.Pages.Count; i++)
{
DocumentPage page = dp.Pages[i];
Directory.CreateDirectory(folderPath);
// Save the each page into PDF format.
page.Save(folderPath + @"\Page - " + (i + 1).ToString() + ".pdf", SaveOptions.PdfDefault);
}
System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(folderPath) { UseShellExecute = true });
}
}
}
Imports System.IO
Imports SautinSoft.Document
Namespace Example
Friend Class Program
Shared Sub Main(ByVal args() As String)
SeparateDocumentToPdfPages()
End Sub
''' Get your free 100-day key here:
''' https://sautinsoft.com/start-for-free/
''' <summary>
''' Load a document and save all pages as separate PDF documents.
''' </summary>
''' <remarks>
''' Details: https://sautinsoft.com/products/document/help/net/developer-guide/pagination-save-document-pages-as-pdf-net-csharp-vb.php
''' </remarks>
Private Shared Sub SeparateDocumentToPdfPages()
Dim filePath As String = "..\..\..\example.docx"
Dim dc As DocumentCore = DocumentCore.Load(filePath)
Dim folderPath As String = Path.GetFullPath("Result-files")
Dim dp As DocumentPaginator = dc.GetPaginator()
For i As Integer = 0 To dp.Pages.Count - 1
Dim page As DocumentPage = dp.Pages(i)
Directory.CreateDirectory(folderPath)
' Save the each page into PDF format.
page.Save(folderPath & "\Page - " & (i + 1).ToString() & ".pdf", SaveOptions.PdfDefault)
Next i
System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(folderPath) With {.UseShellExecute = True})
End Sub
End Class
End Namespace
Если вам нужен пример кода или у вас есть вопрос: напишите нам по адресу support@sautinsoft.com или спросите в онлайн-чате (правый нижний угол этой страницы) или используйте форму ниже: