C#调用OFFICE 2007 转换PDF

http://blog.sina.com.cn/s/blog_52209ba70100olbv.html


先安装office 2007

然后安装office 2007 PDF转换插件SaveAsPDFandXPS.exe(去官网下去)

然后新建项目,引用Microsoft PowerPoint 12.0 Object Library;Microsoft Word12.0 Object Library;Microsoft Excel 12.0 Object Library

 

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using Word = Microsoft.Office.Interop.Word;
using Excel = Microsoft.Office.Interop.Excel;
using PowerPoint = Microsoft.Office.Interop.PowerPoint;
using Microsoft.Office.Core;
using System.IO;

namespace ExcelToPDFMS
{
    publicpartial class PDF : Form
    {
       int ifsucess = 0;
       int iffail = 0;
       int allcount = 0;
       int num = 0;
       public PDF()
       {
           InitializeComponent();
       }

       //Word转换成pdf
       / <summary>
       /// 把Word文件转换成为PDF格式文件
       /// </summary>
       /// <paramname="sourcePath">源文件路径</param>
       /// <paramname="targetPath">目标文件路径</param>
       ///<returns>true=转换成功</returns>
       private bool DOCConvertToPDF(string sourcePath, stringtargetPath)
       {
           bool result = false;
           Word.WdExportFormat exportFormat =Word.WdExportFormat.wdExportFormatPDF;
           object paramMissing = Type.Missing;
           Word.ApplicationClass wordApplication = newWord.ApplicationClass();
           Word.Document wordDocument = null;
           try
           {
               object paramSourceDocPath = sourcePath;
               string paramExportFilePath = targetPath;

               Word.WdExportFormat paramExportFormat = exportFormat;
               bool paramOpenAfterExport = false;
               Word.WdExportOptimizeFor paramExportOptimizeFor =Word.WdExportOptimizeFor.wdExportOptimizeForPrint;
               Word.WdExportRange paramExportRange =Word.WdExportRange.wdExportAllDocument;
               int paramStartPage = 0;
               int paramEndPage = 0;
               Word.WdExportItem paramExportItem =Word.WdExportItem.wdExportDocumentContent;
               bool paramIncludeDocProps = true;
               bool paramKeepIRM = true;
               Word.WdExportCreateBookmarks paramCreateBookmarks =Word.WdExportCreateBookmarks.wdExportCreateWordBookmarks;
               bool paramDocStructureTags = true;
               bool paramBitmapMissingFonts = true;
               bool paramUseISO19005_1 = false;

               wordDocument = wordApplication.Documents.Open(
               ref paramSourceDocPath, ref paramMissing, ref paramMissing,
               ref paramMissing, ref paramMissing, ref paramMissing,
               ref paramMissing, ref paramMissing, ref paramMissing,
               ref paramMissing, ref paramMissing, ref paramMissing,
               ref paramMissing, ref paramMissing, ref paramMissing,
               ref paramMissing);

               if (wordDocument != null)
                   wordDocument.ExportAsFixedFormat(paramExportFilePath,
                   paramExportFormat, paramOpenAfterExport,
                   paramExportOptimizeFor, paramExportRange, paramStartPage,
                   paramEndPage, paramExportItem, paramIncludeDocProps,
                   paramKeepIRM, paramCreateBookmarks, paramDocStructureTags,
                   paramBitmapMissingFonts, paramUseISO19005_1,
                   ref paramMissing);
               result = true;
           }
           catch
           {
               result = false;
           }
           finally
           {
               if (wordDocument != null)
               {
                   wordDocument.Close(ref paramMissing, ref paramMissing, refparamMissing);
                   wordDocument = null;
               }
               if (wordApplication != null)
               {
                   wordApplication.Quit(ref paramMissing, ref paramMissing, refparamMissing);
                   wordApplication = null;
               }
               GC.Collect();
               GC.WaitForPendingFinalizers();
               GC.Collect();
               GC.WaitForPendingFinalizers();
           }
           return result;
       }
       /// <summary>
       /// 把Excel文件转换成PDF格式文件
       /// </summary>
       /// <paramname="sourcePath">源文件路径</param>
       /// <paramname="targetPath">目标文件路径</param>
       ///<returns>true=转换成功</returns>
       private bool XLSConvertToPDF(string sourcePath, stringtargetPath)
       {
           bool result = false;
           Excel.XlFixedFormatType targetType =Excel.XlFixedFormatType.xlTypePDF;
           object missing = Type.Missing;
           Excel.ApplicationClass application = null;
           Excel.Workbook workBook = null;
           try
           {
               application = new Excel.ApplicationClass();
               object target = targetPath;
               object type = targetType;
               workBook = application.Workbooks.Open(sourcePath, missing, missing,missing, missing, missing,
                       missing, missing, missing, missing, missing, missing, missing,missing, missing);

               workBook.ExportAsFixedFormat(targetType, target,Excel.XlFixedFormatQuality.xlQualityStandard, true, false, missing,missing, missing, missing);
               result = true;
           }
           catch
           {
               result = false;
           }
           finally
           {
               if (workBook != null)
               {
                   workBook.Close(true, missing, missing);
                   workBook = null;
               }
               if (application != null)
               {
                   application.Quit();
                   application = null;
               }
               GC.Collect();
               GC.WaitForPendingFinalizers();
               GC.Collect();
               GC.WaitForPendingFinalizers();
           }
           return result;
       }
       /// <summary>
       /// 把PowerPoing文件转换成PDF格式文件
       /// </summary>
       /// <paramname="sourcePath">源文件路径</param>
       /// <paramname="targetPath">目标文件路径</param>
       ///<returns>true=转换成功</returns>
       private bool PPTConvertToPDF(string sourcePath, stringtargetPath)
       {
           bool result;
           PowerPoint.PpSaveAsFileType targetFileType =PowerPoint.PpSaveAsFileType.ppSaveAsPDF;
           object missing = Type.Missing;
           PowerPoint.ApplicationClass application = null;
           PowerPoint.Presentation persentation = null;
           try
           {
               application = new PowerPoint.ApplicationClass();
               persentation = application.Presentations.Open(sourcePath,MsoTriState.msoTrue, MsoTriState.msoFalse,MsoTriState.msoFalse);
               persentation.SaveAs(targetPath, targetFileType,Microsoft.Office.Core.MsoTriState.msoTrue);

               result = true;
           }
           catch
           {
               result = false;
           }
           finally
           {
               if (persentation != null)
               {
                   persentation.Close();
                   persentation = null;
               }
               if (application != null)
               {
                   application.Quit();
                   application = null;
               }
               GC.Collect();
               GC.WaitForPendingFinalizers();
               GC.Collect();
               GC.WaitForPendingFinalizers();
           }
           return result;
       }

 

      private void button1_Click(object sender, EventArgs e)
       {
           DOCConvertToPDF("d:\\test.doc","d:\\test.pdf");
           XLSConvertToPDF("d:\\test.xls", "d:\\test.pdf");
           PPTConvertToPDF("d:\\test.ppt", "d:\\test.pdf");
       }
            
}



项目使用VS2017打开,.net 2.0下运行。 项目使用的微软官方的插件方法,可以将doc, docx, xls, xlsx, ppt, pptx文件转换pdf文件,但是需要: 1、用户需要首先安装一个SaveAsPDFandXPS.exe的工具; 2、如果用户是xp系统,则: 2.1 如果用户安装的是office 2007,则用户在安装office 2007的时候必须要安装Visual Basic for Application 和 Microsoft Office Document Imaging这2个选项,否则转换失败; 2.2 如果用户安装的是office 2010,则在安装office 2010时必须要安装Visual Basic for Application选项,然后从office 2007安装包里面安装Microsoft Office Document Imaging(因为2010删除了这个选项,好麻烦~),否则转换失败; 2.3 xp不能安装office 2013/2016; 3、如果用户是win7系统,则: 3.1 如果用户安装的是office 2007,则用户在安装office 2007的时候必须要安装Visual Basic for Application 和 Microsoft Office Document Imaging这2个选项,否则转换失败; 3.2 如果用户安装的是office 2010,则在安装office 2010时必须要安装Visual Basic for Application选项(win7 + office 2010不需要安装Microsoft Office Document Imaging) 3.3 如果用户安装的是office 2013或2016,则不需要额外选项; 4、如果用户是win10系统,则: 4.1 如果用户安装的是office 2007,则用户在安装office 2007的时候必须要安装Visual Basic for Application这个选项,(win10 + office 2007不需要安装Microsoft Office Document Imaging)否则转换失败; 4.2 如果用户安装的是office 2010,则在安装office 2010时必须要安装Visual Basic for Application选项(win10 + office 2010不需要安装Microsoft Office Document Imaging) 4.3 如果用户安装的是office 2013或2016,则不需要额外选项; 5、如果用户安装了wps 2016或者wps 2019也可以正常转换
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值