zoukankan      html  css  js  c++  java
  • 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;  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

  • 相关阅读:
    Excel怎样设置标题行,Excel工作表中标题行的处理
    Delphi的WebBrowser改造,对网页中Alter等对话框的改造方法
    Delphi实现的MIME邮件格式解析类库
    学习C#中调用COM,后期绑定(以及对WinHttp COM对象的C#封装)
    Unicode in RAD Studio
    Delphi2010中字符串汇编需要注意的一点,以及支持2010的AES加密库
    一个SQL Server中的FormatDatetime函数
    关于图像合成所引申的几个函数
    TstringBuilder Delphi2007版
    SQL Server下字符串,整数转换成16进制字符串的方法
  • 原文地址:https://www.cnblogs.com/liuning8023/p/2943482.html
Copyright © 2011-2022 走看看