我在大眼中为此做了大量努力,但唯一简单和全程的守则是下文。 制作下载。 php文档(或名称,不论名称为何.php),将以下代码拷贝/帕斯特,在代码开头填写东道方、用户名称、密码、数据库和表格各节,并且有非常出色的工作代码。 然后,将实验室档案装入你的浏览器,Xls文档将下载。 我已尝试过,我用了它。
最好:
<?php
// Author: Linmic, email: linmicya@gmail.com
$host = ""; // your db host (ip/dn)
$user = ""; // your db s privileged user account
$password = ""; // and it s password
$db_name = ""; // db name
$tbl_name = ""; // table name of the selected db
$link = mysql_connect ($host, $user, $password) or die( Could not connect: . mysql_error());
mysql_select_db($db_name) or die( Could not select database );
$select = "SELECT * FROM `".$tbl_name."`";
mysql_query( SET NAMES utf8; );
$export = mysql_query($select);
//$fields = mysql_num_rows($export); // thanks to Eric
$fields = mysql_num_fields($export); // by KAOSFORGE
$col_title="";
$data="";
for ($i = 0; $i < $fields; $i++) {
$col_title .= <Cell ss:StyleID="2"><Data ss:Type="String"> .mysql_field_name($export, $i). </Data></Cell> ;
}
$col_title = <Row> .$col_title. </Row> ;
while($row = mysql_fetch_row($export)) {
$line = ;
foreach($row as $value) {
if ((!isset($value)) OR ($value == "")) {
$value = <Cell ss:StyleID="1"><Data ss:Type="String"></Data></Cell> ;
} else {
$value = str_replace( " , , $value);
$value = <Cell ss:StyleID="1"><Data ss:Type="String"> . $value . </Data></Cell> ;
}
$line .= $value;
}
$data .= trim("<Row>".$line."</Row>")."
";
}
$data = str_replace("
","",$data);
header("Content-Type: application/vnd.ms-excel;");
header("Content-Disposition: attachment; filename=export.xls");
header("Pragma: no-cache");
header("Expires: 0");
$xls_header = <?xml version="1.0" encoding="utf-8"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet" xmlns:html="http://www.w3.org/TR/REC-html40">
<DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">
<Author></Author>
<LastAuthor></LastAuthor>
<Company></Company>
</DocumentProperties>
<Styles>
<Style ss:ID="1">
<Alignment ss:Horizontal="Left"/>
</Style>
<Style ss:ID="2">
<Alignment ss:Horizontal="Left"/>
<Font ss:Bold="1"/>
</Style>
</Styles>
<Worksheet ss:Name="Export">
<Table> ;
$xls_footer = </Table>
<WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
<Selected/>
<FreezePanes/>
<FrozenNoSplit/>
<SplitHorizontal>1</SplitHorizontal>
<TopRowBottomPane>1</TopRowBottomPane>
</WorksheetOptions>
</Worksheet>
</Workbook> ;
print $xls_header.$col_title.$data.$xls_footer;
exit;
?>