日期:2013-04-09  浏览次数:20450 次

ADODB应用:

<?php
$conn = new COM("ADODB.Connection");
$conn->Open("Provider = Microsoft.JET.OLEDB.4.0;Data source=D:\usr\www\html\data.mdb");  //ACCESS
//$conn->Open("Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=database;User ID=user;Password=password:)";  //SQL
$rs = $conn->Execute("select * from Spzs");

$num_columns = $rs->Fields->Count();
echo $num_columns . "\n条记录<br>";
for ($i = 0;$i < $num_columns;$i++){
 $fld[$i] = $rs->Fields($i);
}
$rowcount = 0;
while (!$rs->EOF){
 for ($i=0;$i<$num_columns;$i++){
  echo $fld[$i]->value . "\t";  //\t为TAB键
 }
 echo "<br><Br>";
 $rowcount++;   //rowcount递增
 $rs->MoveNext();
}
$rs->Close();
$conn->Close();

$rs->Release();
$conn->Release();

$rs = null;
$conn = null;
?>

调用WORD对象:

<?php
$word = new COM("word.application") or die ("Canot start Microsoft Word");
print "Loaded Word version ($word->Version)\n";
$word->visible = 1;  //将其置前
$word->Documents->Add(); //打开一个新文档

//随便做些事情
$word->Selection->Typetext("This is a test");
$word->Documents[1]->SaveAs("Useless test.doc");
$word->Quit(); //关闭WORD
//释放对象
$word->Release();
$word = null ;
?>