Преобразование PDF в Word в памяти на C# и .NET
Это простое консольное приложение показывает, как конвертировать PDF в DOCX (RTF) в памяти двумя способами.
Первый метод конвертирует PDF в формат DOCX, используя массивы байтов.
Второй метод показывает, как конвертировать PDF в RTF с помощью MemoryStream.
Полный код
GitHubusing System;
using System.IO;
namespace Sample
{
class Sample
{
static void Main(string[] args)
{
ConvertPdfToDocxBytes();
//ConvertPdfToRtfStream();
}
private static void ConvertPdfToDocxBytes()
{
// Before starting, we recommend to get a free 100-day key:
// https://sautinsoft.com/start-for-free/
// Apply the key here:
// SautinSoft.PdfFocus.SetLicense("...");
string pdfFile = Path.GetFullPath(@"..\..\..\simple text.pdf");
// Assume that we already have a PDF document as array of bytes.
byte[] pdf = File.ReadAllBytes(pdfFile);
byte[] docx = null;
// Convert PDF to word in memory
SautinSoft.PdfFocus f = new SautinSoft.PdfFocus();
f.OpenPdf(pdf);
if (f.PageCount > 0)
{
// Convert pdf to word in memory.
docx = f.ToWord();
// Save word document to a file only for demonstration purposes.
if (docx != null)
{
//3. Save to DOCX document to a file for demonstration purposes.
string wordFile = "Result.docx";
File.WriteAllBytes(wordFile, docx);
System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(wordFile) { UseShellExecute = true });
}
}
}
private static void ConvertPdfToRtfStream()
{
string pdfFile = Path.GetFullPath(@"..\..\..\simple text.pdf");
MemoryStream rtfStream = new MemoryStream();
// Convert PDF to word in memory
// Get your free 100-day key here:
// https://sautinsoft.com/start-for-free/
SautinSoft.PdfFocus f = new SautinSoft.PdfFocus();
// Assume that we already have a PDF document as stream.
using (FileStream pdfStream = new FileStream(pdfFile, FileMode.Open, FileAccess.Read))
{
f.OpenPdf(pdfStream);
if (f.PageCount > 0)
{
f.WordOptions.Format = SautinSoft.PdfFocus.CWordOptions.eWordDocument.Rtf;
int res = f.ToWord(rtfStream);
// Save rtfStream to a file for demonstration purposes.
if (res == 0)
{
string rtfFile = "Result.rtf";
File.WriteAllBytes(rtfFile, rtfStream.ToArray());
System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(rtfFile) { UseShellExecute = true });
}
}
}
}
}
}
Imports System.IO
Imports System.Drawing.Imaging
Imports System.Collections.Generic
Imports SautinSoft
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.PdfFocus.SetLicense("...");
ConvertPdfToDocxBytes()
'ConvertPdfToRtfStream()
End Sub
Private Sub ConvertPdfToDocxBytes()
Dim pdfFile As String = Path.GetFullPath("..\..\..\simple text.pdf")
' Assume that we already have a PDF document as array of bytes.
Dim pdf() As Byte = File.ReadAllBytes(pdfFile)
Dim docx() As Byte = Nothing
' Convert PDF to word in memory
Dim f As New SautinSoft.PdfFocus()
f.OpenPdf(pdf)
If f.PageCount > 0 Then
' Convert pdf to word in memory.
docx = f.ToWord()
' Save word document to a file only for demonstration purposes.
If docx IsNot Nothing Then
'3. Save to DOCX document to a file for demonstration purposes.
Dim wordFile As String = "Result.docx"
File.WriteAllBytes(wordFile, docx)
System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(wordFile) With {.UseShellExecute = True})
End If
End If
End Sub
Private Sub ConvertPdfToRtfStream()
Dim pdfFile As String = Path.GetFullPath("..\..\..\simple text.pdf")
Dim rtfStream As New MemoryStream()
' Convert PDF to word in memory
Dim f As New SautinSoft.PdfFocus()
'this property is necessary only for registered version
'f.Serial = "XXXXXXXXXXX"
' Assume that we already have a PDF document as stream.
Using pdfStream As New FileStream(pdfFile, FileMode.Open, FileAccess.Read)
f.OpenPdf(pdfStream)
If f.PageCount > 0 Then
f.WordOptions.Format = SautinSoft.PdfFocus.CWordOptions.eWordDocument.Rtf
Dim res As Integer = f.ToWord(rtfStream)
' Save rtfStream to a file for demonstration purposes.
If res = 0 Then
Dim rtfFile As String = "Result.rtf"
File.WriteAllBytes(rtfFile, rtfStream.ToArray())
System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(rtfFile) With {.UseShellExecute = True})
End If
End If
End Using
End Sub
End Module
Если вам нужен пример кода или у вас есть вопрос: напишите нам по адресу support@sautinsoft.ru или спросите в онлайн-чате (правый нижний угол этой страницы) или используйте форму ниже: