PHP4中使用COM (Windows)--例子

php4 com的ms word例子
#*****************************************************
# 这个例子来自zend站点，并做了一点修改。
# 将会打开一个word的实例，
# 输入一行“this is a test...”
# 存为“useless test.doc”。
#*****************************************************
#实例化一个word控件
$word = new com("word.application") or die("不能实例化word");
#取得并输出版本号
print "载入word, 版本 {$word->version}
";
#用com_get取得版本号
$testversion = com_get($word->application,version);
print "用com_get()取得的版本: $testversion
";
#让word可见
$word->visible = 1;
#打开一个新文档
$word->documents->add();
#写
$word->selection->typetext("this is a test...");
#存
$word->documents[1]->saveas("useless test.doc");
#手工关闭word，如果你想看到文档则注释下面这行
$word->quit();
?>

php4 com的ms excel例子
#设置工作簿，
#在这里我们用excel安装时自带的：solvsamp.xls
$workbook = "c:program filesmicrosoft officeofficesamplessolvsamp.xls";
$sheet = "quick tour";

#实例化工作表控件
$ex = new com("excel.sheet") or die ("did not connect");

#取得程序名称和版本
print "程序名称：{$ex->application->value}
" ;
print "版本：{$ex->application->version}
";

#打开工作簿
$wkb = $ex->application->workbooks->open($workbook) or die ("did not open");

#另存一份，这样就不会破坏原来的文件了
$ex->application->activeworkbook->saveas("ourtest");
#$ex->application->visible = 1; #去掉注释可以让excel可见

#读取一个单元格的内容（e11）
$sheets = $wkb->worksheets($sheet); #选择工作表
$sheets->activate; #激活
$cell = $sheets->cells(11,5) ; #选择单元格（行列号）
$cell->activate; #激活
print "old value = {$cell->value}
"; #打印内容：10000
$cell->value = 15000; #改为15000
print "new value = {$cell->value}
"; #打印新内容：15000

#最后，重新计算工作表
$sheets->calculate; #当计算选项是手工时需要
#看看结果total cost(单元格e13)
$cell = $sheets->cells(13,5) ; #选择单元格
$number = number_format($cell->value);
print "new total cost =$$number - was $47,732 before.
";
#将会打印$57,809

#使用excel的内置函数：
#function: pmt(percent/12 months,number of payments,loan amount)
$pay = $ex->application->pmt(0.08/12,10,10000);
$pay = sprintf("%.2f",$pay);
print "monthly payment for $10,000 loan @8% interest /10 months: $ $pay
";
#将会打印monthly payment = $ -1,037.03

#保存改过的工作簿
$ex->application->activeworkbook->saveas("ourtest");
#关闭所有工作簿
$ex->application->activeworkbook->close("false");
unset ($ex);
?>

警告/可能的问题
　　如果你的代码中有错误，你就有可能实例化了一个对象而没有关闭。结果当你改正了错误后有可能已经存在几个实例了，也许会干扰你的结果。解决：当改正了代码的错误之后，清除（后结束任务）所有的实例再运行新代码。同样的道理，记住在代码的末尾关闭程序断开联接。
　　当使用com_get和com_set时你可能会遇到一些奇怪的现象。例如：为word使用$version = com_get($instance->application,"version");时产生一个excel的错误。
有些对象不能在php4中实例化，这是因为这些对象需要一个php4 com不支持的接口。

为什么用它？
　　希望这几个例子能给你一些启发。php com允许你在php代码里连接许多windows程序。这些代码比asp更容易并且可以和php的数据库函数集成在一起使用。微软使用了一些不同的名称到处推广com技术，例如com+, ado, ole db, owc, windows dna等等。php和apache给这些混淆提供了一个开放的解决方案。
　　原文有三个例子，最后一个因为自己对pdf不是很熟所以没有翻译。