用php_writeexcel导出excel

来源:互联网 发布:mac唇膏色号图 编辑:程序博客网 时间:2024/05/01 22:18

需要用到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);  


?> 

原创粉丝点击