<?
include("db.inc");
include("ToXls.inc");
$db=new db();
$sql = $_POST['sql'];
$fileTypes = $_POST['fileTypes'];
if(empty($fileTypes))
$fileTypes='prt';
if(!empty($sql)){
$sql= str_replace("/'","'",$sql);
$rt = @$db->rtAssoc($sql);
if(is_array($rt)&&!empty($rt)){
$_POST['fileTypes']($rt);
//exit();
}else{
echo "sql err! : <b>".mysql_error()."</b>";
}
}
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Hang Sang Chong Admin - Accessory</title>
<meta http-equiv="content-type" content="text/html; charset=big5">
<link rel="stylesheet" type="text/css" href="../css/common.css">
</head>
<body>
<br>
<form action='' method='POST' name='create'>
<textarea name='sql' rows='10' cols='50' ><?=$sql?></textarea><br/>
<input name='fileTypes' type='radio' value='cvs' <?=$fileTypes=='cvs'?'checked':''?>>
CVS文件
<input name='fileTypes' type='radio' value='prt' <?=$fileTypes=='prt'?'checked':''?>>
直接顯示
<input name='fileTypes' type='radio' value='xls' <?=$fileTypes=='xls'?'checked':''?>>XLS文件<br/>
<input type='submit' name='submit' value='submit'>
</form>
</html>
<?
function xls($rt,$fname='download'){
$xls=new ToXls();
$rowno=0;
$xls->head($fname);
$xls->xlsBOF();
while($row = array_shift($rt)){
$rowno++;
$xls->xlsRow($row,$rowno);
}
$xls->xlsEOF();
exit();
}
function cvs($rt,$fname='download'){
header('Content-Type: text/cvs');
header("Content-Disposition: filename=$fname.csv");
while ($row = array_shift($rt)) {
$row = toCSVformat($row);
$row = join(",",$row);
print $row."/n";
}
exit();
}
function toCSVformat($in) { // for input to be assoc array
foreach ($in as $key => $val) {
if (is_string($val) && !is_numeric($val)) {
$in[$key] = ereg_replace('"','/"',$val);
$in[$key] = '"'.$val.'"';
}
}
return $in;
}
function prt($rt){
echo "<table align='center' >";
while($row=array_shift($rt)){
echo "<tr>";
foreach ($row as $key => $val) {
echo "<td> ".htmlspecialchars($val)."<td>";
}
echo "</tr>";
}
echo "<tr><td><a href='javascript:history.back();'>返回</a><td></tr>";
echo "</table>";
}
?>
php-mysql-create-file
最新推荐文章于 2024-09-18 22:13:49 发布