ASP.NET 用 Office COM 組件將 docx\pptx\xlsx 轉換成 PDF 文件


本文內容

  • 軟件環境
  • 解決方案結構
  • 演示 ASP.NET 用 Office COM 組件將 docx\pptx\xlsx 轉換成 PDF 文件

 

軟件環境


  • VS 2010 framework 4.0
  • Windows 7 旗艦版
  • Office 2007

 

解決方案結構


2013-03-04_215339

  • Upload 目錄。客戶端上傳目錄。
  • PDF 目錄。上傳后,轉換成 PDF 文件的目錄。

 

演示 ASP.NET 用 Office COM 組件將 docx\pptx\xlsx 轉換成 PDF 文件


ConvertToPDF 類將 docx\pptx\xlsx 轉換成 PDF 文件,如下所示:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using Microsoft.Office;
using Word = Microsoft.Office.Interop.Word;
using Excel = Microsoft.Office.Interop.Excel;
using PowerPoint = Microsoft.Office.Interop.PowerPoint;
using Microsoft.Office.Core;
 
namespace ConvertToPDF
{
    public class ConvertToPDF
    {
        public ConvertToPDF()
        {
        }
        /// <summary>
        /// DOC 2 PDF
        /// </summary>
        /// <param name="sourcePath">源路徑</param>
        /// <param name="targetPath">目標路徑</param>
        /// <returns></returns>
        public bool DOC2PDF(string sourcePath, string targetPath)
        {
            bool result = false;
            Word.WdExportFormat exportFormat = Word.WdExportFormat.wdExportFormatPDF;
            object paramMissing = Type.Missing;
            Word.ApplicationClass wordApplication = new Word.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, ref paramMissing);
                    wordDocument = null;
                }
                if (wordApplication != null)
                {
                    wordApplication.Quit(ref paramMissing, ref paramMissing, ref paramMissing);
                    wordApplication = null;
                }
                GC.Collect();
                GC.WaitForPendingFinalizers();
                GC.Collect();
                GC.WaitForPendingFinalizers();
            }
            return result;
        }
        /// <summary>
        /// XLS 2 PDF
        /// </summary>
        /// <param name="sourcePath">源路徑</param>
        /// <param name="targetPath">目標路徑</param>
        /// <returns></returns>
        public bool XLS2PDF(string sourcePath, string targetPath)
        {
            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>
        /// PPT 2 PDF
        /// </summary>
        /// <param name="sourcePath">源路徑</param>
        /// <param name="targetPath">目標路徑</param>
        /// <returns></returns>
        public bool PPT2PDF(string sourcePath, string targetPath)
        {
            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;
        }
    }
}

通過如下方式添加 Office COM 組件。

2013-03-04_214741

頁面代碼如下所示:

<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="Default.aspx.cs" Inherits="ConvertToPDF._Default" %>
 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
</head>
<body>
    <form id="form1" runat="server">
    <div style="margin: 50px auto; border: #e3e3e3 1px solid; height: 300px; width: 350px;
        background-color: #8ABAE3; padding: 20px 20px 20px 20px;">
        <asp:FileUpload ID="FileUpload1" runat="server" />
        <br />
        <br />
        &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <asp:Button ID="Btn_Upload" runat="server" Text="上傳" OnClick="Btn_Upload_Click" />
        <br />
        <br />
        選擇列表框中的文件,查看:
        <br />
        <asp:ListBox ID="ListBox1" runat="server" Height="205px" Width="290px"></asp:ListBox>
    </div>
    </form>
</body>
</html>

后台代碼如下所示:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.IO;
 
namespace ConvertToPDF
{
    public partial class _Default : System.Web.UI.Page
    {
        protected void Page_Load(object sender, EventArgs e)
        {
 
        }
 
        /// <summary>
        /// 文檔上傳
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        protected void Btn_Upload_Click(object sender, EventArgs e)
        {
            if (FileUpload1.HasFile)
            {
                try
                {
                    string fileName = FileUpload1.FileName;
                    string fileExtention = FileUpload1.FileName.Substring(fileName.LastIndexOf(".") + 1);
                    string filePath = HttpContext.Current.Server.MapPath("~/Upload\\") + fileName;
                    FileUpload1.SaveAs(filePath);
                    ListBox1.Items.Add(new ListItem(fileName, fileName));
 
                    bool bl = Convert(fileName, fileExtention);
                    Page.ClientScript.RegisterStartupScript(this.GetType(), "", bl ? "<script>alert('上傳、轉換成功!')</script>" : "<script>alert('上傳、轉換失敗!')</script>");
                }
                catch
                {
 
                }
            }
        }
 
        private bool Convert(string fileName, string fileExtention)
        {
            string srcPath = HttpContext.Current.Server.MapPath("~/Upload\\") + fileName;
            string targetPath = HttpContext.Current.Server.MapPath("~/PDF\\") + fileName.Replace(".","-") + ".pdf";
 
            ConvertToPDF c = new ConvertToPDF();
            bool bl = false;
            switch (fileExtention.ToUpper())
            {
                case "DOC":
                case "DOCX":
                    bl = c.DOC2PDF(srcPath, targetPath);
                    break;
                case "XLS":
                case "XLSX":
                    bl = c.XLS2PDF(srcPath, targetPath);
                    break;
                case "PPT":
                case "PPTX":
                    bl = c.PPT2PDF(srcPath, targetPath);
                    break;
                default:
                    bl = false;
                    break;
            }
            return bl;
        }
    }
}

運行結果:

2013-03-04_215712_副本

下載 Demo


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM