Преобразование файла Doc в PDF в VB.Net

Question

У меня возникла ситуация, когда мне нужно преобразовать файл Doc в файл PDF. Я разрабатываю приложение Windows в vb.net. а также я не хочу, если возможно, стороннюю dll-пользователя. так может кто-нибудь дать мне еще идею?

Answer 1

Вы можете использовать Office, Interop для этого. Но лучше использовать некоторые управляемые библиотеки как Aspose

using Microsoft.Office.Interop.Word; 
using System; 
using System.Collections.Generic; 
using System.IO; 
using System.Linq; 
using System.Text; 

... 

// Create a new Microsoft Word application object 
Microsoft.Office.Interop.Word.Application word = new Microsoft.Office.Interop.Word.Application(); 

// C# doesn't have optional arguments so we'll need a dummy value 
object oMissing = System.Reflection.Missing.Value; 

// Get list of Word files in specified directory 
DirectoryInfo dirInfo = new DirectoryInfo(@"\\server\folder"); 
FileInfo[] wordFiles = dirInfo.GetFiles("*.doc"); 

word.Visible = false; 
word.ScreenUpdating = false; 

foreach (FileInfo wordFile in wordFiles) 
{ 
    // Cast as Object for word Open method 
    Object filename = (Object)wordFile.FullName; 

    // Use the dummy value as a placeholder for optional arguments 
    Document doc = word.Documents.Open(ref filename, ref oMissing, 
     ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, 
     ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, 
     ref oMissing, ref oMissing, ref oMissing, ref oMissing); 
    doc.Activate(); 

    object outputFileName = wordFile.FullName.Replace(".doc", ".pdf"); 
    object fileFormat = WdSaveFormat.wdFormatPDF; 

    // Save document into PDF Format 
    doc.SaveAs(ref outputFileName, 
     ref fileFormat, ref oMissing, ref oMissing, 
     ref oMissing, ref oMissing, ref oMissing, ref oMissing, 
     ref oMissing, ref oMissing, ref oMissing, ref oMissing, 
     ref oMissing, ref oMissing, ref oMissing, ref oMissing); 

    // Close the Word document, but leave the Word application open. 
    // doc has to be cast to type _Document so that it will find the 
    // correct Close method.     
    object saveChanges = WdSaveOptions.wdDoNotSaveChanges; 
    ((_Document)doc).Close(ref saveChanges, ref oMissing, ref oMissing); 
    doc = null; 
} 

// word has to be cast to type _Application so that it will find 
// the correct Quit method. 
((_Application)word).Quit(ref oMissing, ref oMissing, ref oMissing); 
word = null; 

Answer 2

2007 Microsoft Office Add-in: Microsoft Сохранить как PDF и 2007 Microsoft Office Add-in: Microsoft Сохранить как XPS позволяет Microsoft Office Word 2007 экспортировать и сохранять документы в форматах PDF и XPS.

Проверьте это:
Saving Word 2007 Documents to PDF and XPS Formats
How to convert Word to PDF in asp.net

Если вы хотите использовать Thirt DLL партии затем проверить эту SO нить: Converting MS Word Documents to PDF in ASP.NET

Answer 3

Imports Microsoft.Office.Interop 

'This code happens to be loading a template, but it isn't necessary... 

'Opens Word Application 

Dim MyApp As New Word.Application 

'Opens new WordDoc 

Dim MyWordDoc As Word.Document = MyApp.Documents.Add(template) 

MyApp.Visible = True 

MyWordDoc = MyApp.ActiveDocument 

'code to fill doc 

'code to fill doc 

'code to fill doc 

MyWordDoc.SaveAs(FileLocation, Word.WdSaveFormat.wdFormatPDF)