在VB.Net中将Doc文件转换为PDF

前端之家收集整理的这篇文章主要介绍了在VB.Net中将Doc文件转换为PDF前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我有一种情况需要将Doc文件转换为PDF文件.我在vb.net中开发windows应用程序.如果可能的话,我也不想使用第三方DLL.
所以有人能给我一些更多的想法吗?
您可以使用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);
    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);

    // 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);
    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);
word = null;
原文链接:https://www.f2er.com/vb/255949.html

猜你在找的VB相关文章