将PPT&WORD&EXCEL转换成html格式

 public static void PptToHtmlFile(string PptFilePath)
    {
        Microsoft.Office.Interop.PowerPoint.Application ppt = new Microsoft.Office.Interop.PowerPoint.Application();
        Microsoft.Office.Interop.PowerPoint.Presentation pptFile = null;
        try
        {
            //获得html文件名
            string htmlFileName = PptFilePath.Substring(0, PptFilePath.LastIndexOf(".")) + ".html";
            //打开一个ppt文件
            pptFile = ppt.Presentations.Open(PptFilePath, Microsoft.Office.Core.MsoTriState.msoTrue,
                Microsoft.Office.Core.MsoTriState.msoCTrue, Microsoft.Office.Core.MsoTriState.msoFalse);
            //转换成html格式
            pptFile.SaveAs(htmlFileName, Microsoft.Office.Interop.PowerPoint.PpSaveAsFileType.ppSaveAsHTML,
                Microsoft.Office.Core.MsoTriState.msoCTrue);
        }
        finally
        {
            if (pptFile != null)
            {
                pptFile.Close();
            }
            ppt.Quit();
            GC.Collect();
        }
    }

     <summary>
     将Excel文件转换成HTML格式
     </summary>
     <param name="ExcelFilePath">Excel文件路径</param>
    public static void ExcelToHtmlFile(string ExcelFilePath)
    {
        Microsoft.Office.Interop.Excel.Application excelApp = new Microsoft.Office.Interop.Excel.Application();
        Microsoft.Office.Interop.Excel.Workbook oBook = null;
         缺省参数
        object Unknown = Type.Missing;
        try
        {
            目标html文件路径
            object Target = ExcelFilePath.Substring(0, ExcelFilePath.LastIndexOf(".")) + ".html";
            为了保险,只读方式打开
            object readOnly = true;
             指定另存为格式(html)
            object format = Microsoft.Office.Interop.Excel.XlFileFormat.xlHtml;

            打开Excel文件
            oBook = excelApp.Workbooks.Open(ExcelFilePath, Unknown, readOnly,
                Unknown, Unknown, Unknown, Unknown, Unknown, Unknown,
                Unknown, Unknown, Unknown, Unknown, Unknown, Unknown);

             转换格式
            oBook.SaveAs(Target, format, Unknown, Unknown, Unknown, Unknown,
                 Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange,
                 Unknown, Unknown, Unknown, Unknown, Unknown);
        }
        finally
        {
            if (oBook != null)
            {
                oBook.Close(false, Unknown, Unknown);
            }
            excelApp.Quit();
            GC.Collect();
        }
    }

     <summary>
     将Word文档转换成HTML格式
     </summary>
     <param name="WordFilePath">Word文档格式</param>
    public static void WordToHtmlFile(string WordFilePath)
    {
        Microsoft.Office.Interop.Word.Application newApp = new Microsoft.Office.Interop.Word.Application();
        Microsoft.Office.Interop.Word.Document doc = null;
         缺省参数
        object Unknown = Type.Missing;
        try
        {
             指定原文件和目标文件
            object Source = WordFilePath;
            object Target = WordFilePath.Substring(0, WordFilePath.LastIndexOf(".")) + ".html";
            为了保险,只读方式打开
            object readOnly = true;
             指定另存为格式(html)
            object format = Microsoft.Office.Interop.Word.WdSaveFormat.wdFormatHTML;

             打开doc文件
            doc = newApp.Documents.Open(ref Source, ref Unknown, ref readOnly,
                ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown,
                ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown);

             转换格式
            doc.SaveAs(ref Target, ref format,
                ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown,
                ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown, ref Unknown);
        }
        finally
        {
            if (doc != null)
            {
                 关闭文档和Word程序
                doc.Close(ref Unknown, ref Unknown, ref Unknown);
            }
            newApp.Quit(ref Unknown, ref Unknown, ref Unknown);
            GC.Collect();
        }
    }

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 1
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值