windows office com组件 php pptx转pdf

1.

2.修改office的dcom组件

comexp.msc

如果找不到就看一下安装的office的位数  

32位的用 

comexp.msc -32

右键属性

双击选中 everyone

同样添加everyone

55.

public function ppt_to_pdf() {
        $srcfilename = 'E:/aa.ppt';
        $destfilename = 'E:/aa.pdf';
        try {
            if(!file_exists($srcfilename)){
                return;
            }
            $ppt = new \COM("powerpoint.application") or die("Unable to instantiate Powerpoint");
            $presentation = $ppt->Presentations->Open($srcfilename, false, false, false);
            $presentation->SaveAs($destfilename,32,1);
            $presentation->Close();
            $ppt->Quit();
        } catch (\Exception $e) {
            if (method_exists($ppt, "Quit")){
                $ppt->Quit();
            }
            return;
        }
    }

public function excel_to_pdf() {
        $srcfilename = 'E:/aa.xls';
        $destfilename = 'E:/aa.pdf';
        try {
            if(!file_exists($srcfilename)){
                return;
            }
            $excel = new \COM("excel.application") or die("Unable to instantiate excel");
            $workbook = $excel->Workbooks->Open($srcfilename, null, false, null, "1", "1", true);
            $workbook->ExportAsFixedFormat(0, $destfilename);
            $workbook->Close();
            $excel->Quit();
        } catch (\Exception $e) {
             echo ("src:$srcfilename catch exception:" . $e->__toString());
            if (method_exists($excel, "Quit")){
                $excel->Quit();
            }
            return;
        }
    }

 public function doc_to_pdf() {
        $srcfilename = 'E:/aa.doc';
        $destfilename = 'E:/aa.pdf';
        try {
            if(!file_exists($srcfilename)){
                return;
            }
 
            $word = new \COM("word.application") or die("Can't start Word!");
            $word->Visible=0;
            $word->Documents->Open($srcfilename, false, false, false, "1", "1", true);
           
            $word->ActiveDocument->final = false;
            $word->ActiveDocument->Saved = true;
            $word->ActiveDocument->ExportAsFixedFormat(
                $destfilename,
                17,                         // wdExportFormatPDF
                false,                      // open file after export
                0,                          // wdExportOptimizeForPrint
                3,                          // wdExportFromTo
                1,                          // begin page
                5000,                       // end page
                7,                          // wdExportDocumentWithMarkup
                true,                       // IncludeDocProps
                true,                       // KeepIRM
                1                           // WdExportCreateBookmarks
            );
            $word->ActiveDocument->Close();
            $word->Quit();
        } catch (\Exception $e) {
            if (method_exists($word, "Quit")){
                $word->Quit();
            }
            return;
        }
    }

本文为看恩吧原创文章,转载无需和我联系,但请注明来自knsay.com

打赏

• 上一篇： php实现pptx转pdf，每页转存为图片
• 下一篇： 不错的前端组件1