需要用到php_writeexcel-0.3.0.tar.gz,可以找我要,或到管方网站下
<?php
/**
* 美康网站-生成excel
* @author Jzealot <web-xy@163.com>
* @copyright 2006-12-19
* @license http://www.xxxxx.com
* @since File available since Release 0.1
*/
require_once "inc/dbConfig.php";
set_time_limit(10);
require_once "libs/writeexcel-0.3.0/class.writeexcel_workbook.inc.php";
require_once "libs/writeexcel-0.3.0/class.writeexcel_worksheet.inc.php";
require_once "dbobj/Users.php";
$db = & new DB_DataObject;
$tb_user = & new DataObjects_Users;
$fname = tempnam("/_temp", "colors.xls");
$workbook = &new writeexcel_workbook($fname);
# Some common formats
$center =& $workbook->addformat(array('align' => 'center'));
$heading =& $workbook->addformat(array('align' => 'center', 'bold' => 1));
$worksheet1 =& $workbook->addworksheet('客户列表');
$worksheet1->write(0, 0, "序号", $heading);
$worksheet1->write(0, 1, "ID", $heading);
$worksheet1->write(0, 2, "用户名", $heading);
$worksheet1->write(0, 3, "行业", $heading);
$tb_user -> orderBy("Id desc");
$tb_user -> find();
$i = 0;
while($tb_user -> fetch())
{
$db -> callp("select Id,CatName from CaseCat where Id='".$tb_user -> CatId."'");
$n = $db -> fetch();
if(empty($n))
$catname = "未知行业";
else
$catname = $db -> CatName;
$format =& $workbook->addformat(array(
'fg_color' => $color,
'pattern' => 1,
'border' => 1
));
$worksheet1->write($i+1, 0, $i, $center);
$worksheet1->write($i+1, 1, $tb_user -> Id, $center);
$worksheet1->write($i+1, 2, $tb_user -> UserName, $center);
$worksheet1->write($i+1, 3, $catname, $format);
$i = $i + 1;
}
$workbook->close();
header("Content-Type: application/x-msexcel; name=/"example-colors.xls/"");
header("Content-Disposition: inline; filename=/"example-colors.xls/"");
$fh=fopen($fname, "rb");
fpassthru($fh);
unlink($fname);
?>