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

来源:互联网 发布:淘宝网日本代购 编辑:程序博客网 时间:2024/06/05 15:32

 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();
        }
    }

原创粉丝点击
热门问题 老师的惩罚 人脸识别 我在镇武司摸鱼那些年 重生之率土为王 我在大康的咸鱼生活 盘龙之生命进化 天生仙种 凡人之先天五行 春回大明朝 姑娘不必设防,我是瞎子 朋友把我拉黑了怎么办 下雨了怎么办我好想你 雨停怎么办我好想你 下雨天怎么办我好想你 天谕账号忘记了怎么办 天谕账号被冻结怎么办 促黄体生成素低怎么办 地暖家里太干燥怎么办 剑灵摧毁了东西怎么办 想打嗝打不出来怎么办 孩子满100天要怎么办 宝宝吃奶粉过敏了怎么办 1岁宝宝不喝奶粉怎么办 母乳不够宝宝不喝奶粉怎么办 宝宝吃奶粉上火了怎么办 我小孩不喝奶粉怎么办 2岁宝宝不喝奶粉怎么办 婴儿吃奶粉上火了怎么办 100天的宝宝咳嗽怎么办 40天的小孩咳嗽怎么办 40天的婴儿咳嗽怎么办 50天的婴儿咳嗽怎么办 宝宝20天感冒了怎么办 1个月宝宝咳嗽怎么办 40天的宝宝干咳怎么办 百天的宝宝咳嗽怎么办 50天的孩子咳嗽怎么办 百天宝宝咳嗽有痰怎么办 1岁半宝宝拉肚子怎么办 百天的宝宝拉肚子怎么办 激战2帧数三十多怎么办 太受欢迎了怎么办txt微 太受欢迎了怎么办网盘 太受欢迎了怎么办微盘 我太受欢迎了该怎么办h 我太受欢迎了该怎么办1 卡培他滨副作用怎么办 究极风暴4卡怎么办 脸下垂法令纹深怎么办 20岁有法令纹怎么办 3个月婴儿铅超标怎么办