将数据库的数据导入到excel中

---------------------------------------------------------------

<?php
// 转载请注明phpteam
$title = "数据库名:test, 数据表:test, 备份日期:" . date("Y-m-d H:i:s");
$sep = "/t";
$crlf = "/n";

$conn = @mysql_connect("localhost", "root", "") or die("不能连接数据库");
@mysql_select_db("test", $conn);
header("Content-Type: application/vnd.ms-excel");
header("Content-Disposition: attachment; filename=test.xls");
header("Pragma: no-cache");
header("Expires: 0");

echo $title . $crlf . $crlf;

$query = "select * from test";
$result = mysql_query($query) or die(mysql_error());
$fields = mysql_num_fields($result);
for($i = 0; $i < $fields; $i++) {
    echo mysql_field_name($result, $i) . $sep;
}
echo $crlf;
while($row = mysql_fetch_row($result)) {
    $line = "";
    for($i = 0; $i<$fields; $i++) {
        $line .= $row[$i] . $sep;
    }
    echo $line . $crlf;
}
?>
---------------------------------------------------------------

<?
set_time_limit(3600);
$conn=mysql_connect("localhost","root","");
$select=mysql_select_db("a",$conn1);
$sql="select a,b,lose_qty,cfrom aa";
$query=mysql_query($sql,$link);
$col=sql_num_rows($query);
for($m_i=0;$m_i<$col;$m_i++)
{
  for($m_j=0;$m_j<4;$m_j++)
 {
     $value=mysql_result($query,$m_i,$m_j);
     $m_array[$m_i][$m_j]=$value;
 }
}

$workbook="c:/myweb/1.xls";
$sheet = "Sheet1"; 
$ex = new COM("Excel.sheet") or Die ("连不上！！！"); 
$book = $ex->application->Workbooks->Open($workbook) or Die ("打不开！！！"); 
$sheets = $book->Worksheets($sheet);
$sheets->activate; 
for($m_i=0;$m_i<$col;$m_i++)
{
  for($m_j=0;$m_j<4;$m_j++)
  {
    $cell=$sheets->Cells($m_i+2,$m_j+1);
    $cell->activate;
    $cell->value=$m_array[$m_i][$m_j];
  }
}
$ex->Application->ActiveWorkbook->SaveAs("c:/c1.xls");
$ex->Application->ActiveWorkbook->Close("False");
unset ($ex);
}