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