ob_start();//開啟緩存

print'';//輸出頭部

$content = file_get_contents

(S_ROOT.'./temp/word/jzydt.htm');//取得模板內(nèi)容
$content = str_replace('<{jzydt_company_name}>',"400電話",$content);//經(jīng)過一列替換操作，將會模板里的標簽替換為接受的值,如果感覺有必要的話，用正則替換也行，但我不建議動不動就用正則，能不用就不用吧！
$docname = 'jzydt.doc';//生成保存的文件名,后綴為doc
echo $content;//將替換后的內(nèi)容輸出到緩存中
print "";
$data = ob_get_contents();
ob_end_clean();
$fp=fopen(S_ROOT.'./temp/word/'.$docname,"wb");//以二進制寫權(quán)限打開一個新的word文件，即新建
fwrite($fp,$data);//將內(nèi)容寫入并 保存
fclose($fp);

<?
// 建立一個指向新COM組件的索引
$word = new COM(”word.application”) or die(”Can't start Word!”);
// 顯示目前正在使用的Word的版本號
//echo “Loading Word, v. {$word->Version}<br>”;
// 把它的可見性設(shè)置為0（假），如果要使它在最前端打開，使用1（真）
// to open the application in the forefront, use 1 (true)
//$word->Visible = 0;

//打?一個文檔
$word->Documents->OPen(”d:\myweb\muban.doc”);
//讀取文檔內(nèi)容

$test= $word->ActiveDocument->content->Text;

echo $test;
echo “<br>”;
//將文檔中需要換的變量更換一下
$test=str_replace(”<{變量}>”,”這是變量”,$test);
echo $test;
$word->Documents->Add();
// 在新文檔中添加文字
$word->Selection->TypeText(”$test”);
//把文檔保存在目錄中
$word->Documents[1]->SaveAs(”d:/myweb/comtest.doc”);
// 關(guān)閉與COM組件之間的連接
$word->Quit();
?>