PHP把数据库数据导入Excel

<?php
function xlsBOF() {
 echo pack("ssssss", 0x809, 0x8, 0x0, 0x10, 0x0, 0x0);
 return;
}
function xlsEOF() {
 echo pack("ss", 0x0A, 0x00);
 return;
}
function format( $STR ){
 $STR = str_replace( "\"", "", $STR );
 if ( strpos( $STR, "," ) ){
  $STR = "\"".$STR."\"";
 }
 $STR = iconv( "utf-8", "gb2312", $STR );
 return $STR;
}
function xlsWriteNumber($Row, $Col, $Value) {
 echo pack("sssss", 0x203, 14, $Row, $Col, 0x0);
 echo pack("d", $Value);
 return;
}
function xlsWriteLabel($Row, $Col, $Value ) {
 $L = strlen($Value);
 echo pack("ssssss", 0x204, 8 + $L, $Row, $Col, 0x0, $L);
 echo $Value;
 return;
}
function write_excel_line($hang,$lie,$val){
 if(is_numeric($val)){
  xlsWriteNumber($hang,$lie,$val);
 }else{
  xlsWriteLabel($hang,$lie,$val);
 }
}
$mktime = "message";
header('Content-Type: text/html; charset=utf-8');
header("Pragma: public");
header("Expires: 0");
header("Cache-Control: must-revalidate, post-check=0, pre-check=0");
header("Content-Type: application/force-download");
header("Content-Type: application/octet-stream");
header("Content-Type: application/download");
header("Content-Disposition: attachment;filename=$mktime.xls ");
header("Content-Transfer-Encoding: binary ");
// XLS Data Cell
xlsBOF();
xlsWriteLabel(0, 0, format('姓名'));
xlsWriteLabel(0, 1, format('邮箱'));
xlsWriteLabel(0, 2, format('电话'));
xlsWriteLabel(0, 3, format('地址'));
xlsWriteLabel(0, 4, format('留言内容'));
xlsWriteLabel(0, 5, format('留言时间'));



    
    $conn=@mysql_connect("localhost","root","")  or die(mysql_error());
    @mysql_select_db('demo',$conn) or die(mysql_error());
    mysql_query("SET names UTF8");

    $sql = "select * from message";
    $result=mysql_query($sql);
    $i = 0;
    while($row = mysql_fetch_array($result)) {
        $i++;
        write_excel_line($i, 0, $row['name']);
        write_excel_line($i, 1, $row['email']);
        write_excel_line($i, 2, $row['phone']);
        write_excel_line($i, 3, $row['address']);
        write_excel_line($i, 4, $row['content']);
        write_excel_line($i, 5, $row['time']);
       
    }
    

xlsEOF();
exit();
?>

 

posted @ 2016-06-18 20:21  低头捡到蛋  阅读(192)  评论(0编辑  收藏  举报