php ppt com,帮忙看下，这个程序实现使用office的COM组件将ppt转换为图片

旧城等待， 2023-01-17 10:52 64阅读 0赞

该楼层疑似违规已被系统折叠 隐藏此楼查看此楼

本人比较菜，看不出来为什么，只支持office2003或者是office2007.请问如何能改为更高版本的吗，因为这两个版本只有32位的，在64位系统下调用不到COM组件。

/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/

/\* \*/

/\* Dezend for PHP5 \*/

/\* NWS \*/

/\* Nulled.WS \*/

/\* \*/

/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/

$debug = true;

header( "Content-Type:text/xml;charset=UTF-8" );

header( "Cache-Control: no-store, no-cache, must-revalidate" );

header( "Cache-Control: post-check=0, pre-check=0", false );

require\_once( "../inc/inc.php" );

$uploadFileName = $\_FILES\[\*Filedata\*\]\[\*name\*\];

$uploadFile = $\_FILES\[\*Filedata\*\]\[\*tmp\_name\*\];

$localFormat = getFileExt( $uploadFileName );

$is\_allowed\_upload = true;

$forbbidenFileType = array( "php", "sh", "exe", "bat" );

putlog( "1: ".api\_get\_path( SYS\_PATH ));

foreach ( $forbbidenFileType as $value )

\{

if ( strtolower( $localFormat ) == $value )

\{

$is\_allowed\_upload = false;

break;

break;

\}

\}

if ( strtolower( $localFormat ) != "ppt" )

\{

$is\_allowed\_upload = false;

\}

if ( $is\_allowed\_upload && is\_uploaded\_file( $uploadFile ) )

\{

$extendType = getFileExt( $uploadFileName );

$localFileName = trim( $\_GET\[\*fileName\*\] );

$localFile = api\_get\_path( SYS\_PATH )."meeting/pptUpload/".$localFileName;

if ( move\_uploaded\_file( $uploadFile, $localFile ) )

\{

$pos = strrpos( $localFileName, "." );

$len = strlen( $uploadFileName );

$folder = substr( $localFileName, 0, $pos );

$create\_date = date( "Y-m-d h:i:s" );

if ( !( $ppt = new COM( "powerpoint.application" ) ) )

\{

exit( "Unable to Open MSPowerPoint" );

\}

putlog( "断点1 ".$localFile ." ..");

$ppt->Visible = true;

putlog( "断点2 " );

$ppt->Presentations->Open( realpath( $localFile ) );

putlog( "断点3 " );

$pptCount = $ppt->activePresentation->Slides->Count;

$export\_folder = api\_get\_path( SYS\_PATH )."meeting/pptUpload/".$folder;

if ( !file\_exists( $export\_folder ) )

\{

mkdir( $export\_folder, 511 );

\}

$ppt->activePresentation->Export( $export\_folder, "JPG", 640, 480 );

$ppt->Quit( );

$sql = "insert into attachment (file\_name,local\_file\_name,meet\_no,file\_size,file\_type,created\_time,model\_type) values (\*".$uploadFileName."\*,\*".$folder."\*,\*". trim( $\_GET\[\*roomID\*\] )."\*,\*".$pptCount."\*,\*".$extendType."\*,NOW(),\*PRESENTATION\*)";

$rs = api\_sql\_query( $sql, \_\_FILE\_\_, 61 );

if ( !$rs && $debug )

\{ putlog("insert zlchat pptFile -".$uploadFileName." ERROR!");

error\_log( "insert zlchat pptFile -".$uploadFileName." ERROR!", 0 );

\}else

putlog($sql);

$path2 = api\_get\_path( SYS\_PATH )."meeting/pptUpload/".$folder."/";

$handle = opendir( $path2 );

while ( $file = readdir( $handle ) )

\{

if ( !is\_dir( $file ) )

\{

preg\_match\_all( "/(\\\\d+)\\\\.JPG$/", $file, $name\_arr );

$newName = $name\_arr\[0\]\[0\];

rename( $path2.$file, $path2.$newName );

\}

\}

closedir( $handle );

\}

else

\{

if ( $debug )

\{

error\_log( "upload zlchat pptFile -".$uploadFileName." ERROR!", 0 );

\}

\}

\}

?>

发表评论取消回复

表情：

评论列表（有 0 条评论，64人围观）

还没有评论，来说两句吧...

相关阅读

相关怎么用Python批量将ppt转换为pdf

![85a7e2b73d6e89b09e469beaf1207afe.jpeg][] 这是一个Python脚本，能够批量地将微软Powerpoint文件（.ppt或者.ppt

深碍√TFBOYSˉ_/ 2024年03月31日 09:37/ 0 赞/ 34 阅读

相关 php ppt com,帮忙看下，这个程序实现使用office的COM组件将ppt转换为图片

该楼层疑似违规已被系统折叠隐藏此楼查看此楼本人比较菜，看不出来为什么，只支持office2003或者是office2007.请问如何能改为更高版本的吗，因为这两个版本只有

旧城等待，/ 2023年01月17日 10:52/ 0 赞/ 65 阅读

相关 1ppt.com.html,第一PPT模板网-WW.1PPT.COM.ppt

第一PPT模板网-WW.1PPT.COM 中华鲟也是一种古生物，它有一亿多年的历史。中华鲟生活在江河里，最大的可以长到五百千克重。它身上披着大片的硬鳞，核桃大的眼睛亮晶晶的，

骑猪看日落/ 2022年10月10日 15:53/ 0 赞/ 162 阅读

相关计算机软件为题的ppt,《计算机软件的组成》PPT课件.ppt

《《计算机软件的组成》PPT课件.ppt》由会员分享，可在线阅读，更多相关《《计算机软件的组成》PPT课件.ppt(16页珍藏版)》请在人人文库网上搜索。 1、1.3计算机的

墨蓝/ 2022年08月30日 01:40/ 0 赞/ 242 阅读

相关 VS下 MFC通过COM操作PPT

需要整合一些PPT、Word、PDF进软件，由于PPT有切换动画、音效等难以转化的功能，所以需要将它整体嵌入进来。所以只能用微软的库，以下DLL可以实现播放、跳转页、关闭、获得

柔光的暖阳◎/ 2022年07月12日 17:25/ 0 赞/ 144 阅读

相关 PPT组件Spire.Presentation教程：在C＃中将PPT文档转换为EMF图像

本文将演示如何将PowerPoint文档转换为EMF图像。使用[Spire.Presentation for .NET][]，我们可以将演示幻灯片保存为与原始幻灯片相同大小的

超、凢脫俗/ 2022年06月09日 12:57/ 0 赞/ 423 阅读

相关 PPT组件 Spire.Presentation V2.8.49发布|支持将PPT转换为HTML和TIFF

[Spire.Presentation for .NET 2.8.49][] 更新支持将PowerPoint文档转换为HTML和TIFF -----------

末蓝、/ 2022年06月09日 06:39/ 0 赞/ 121 阅读

相关 python win32com批量导出.ppt/.pptx文件所有图片

环境：py2.7 要求： 1、先pip安装pywin32 pip install pywin32 2、这份代码最好和你的PPT文件放在同一目录下，且目录不能有

电玩女神/ 2022年05月22日 06:27/ 0 赞/ 179 阅读

相关 java使用jacob控制office组件实现word、excel、PPT转换成PDF

java使用jacob控制office组件实现word、excel、PPT转换成PDF 本文介绍java直接调用Microsoft Office 或 WPS组件实现wor

痛定思痛。/ 2022年03月17日 06:22/ 0 赞/ 535 阅读

相关 ppt怎么转换为pdf

PPT格式在办公中对大家的帮助都很大，但是在很多时候，办公过程中传输文件，为了保证文件的稳定性，通常都是把文件转成稳定性比较好的PDF格式，PPT文件也是不例外的，下面小编就告

Dear 丶/ 2022年01月13日 01:09/ 0 赞/ 295 阅读