Chinaunix首页 | 论坛 | 博客
  • 博客访问: 18681052
  • 博文数量: 7460
  • 博客积分: 10434
  • 博客等级: 上将
  • 技术积分: 78178
  • 用 户 组: 普通用户
  • 注册时间: 2008-03-02 22:54
文章分类

全部博文(7460)

文章存档

2011年(1)

2009年(669)

2008年(6790)

分类:

2008-04-18 09:39:35

  • 生成word文档的,这个是用来生产试卷的简单PHP代码

//初始化session
session_start();
// 包含连接文件和头文件
?>


试卷生成


include('head.php');
require ('dbconnect.php');
?>
$juge=0;
for($i=1;($i<100);$i++)
{
$a=$i;
if(isset($_POST[$a]))
{
if($juge==0)
$sql.=" id=".$_POST[$a];
else
$sql.=" or id=".$_POST[$a];
$juge=1;
}
}
if($sql!="")
{
$sql="SELECT * FROM test WHERE".$sql;
$result_array=array(); //返回数组
$i=0; //数组下标
$query_result=@mysql_query($sql,$conn);
while($row=@mysql_fetch_object($query_result))
{
$i++;
$cout.=$i."  ";
$cout.="题目难度:".$row->difficulty."
";
$cout.="   ".$row->content."

";
}//while

?>
class word
{
function start()
{
ob_start();
print'xmlns:w="urn:schemas-microsoft-com:office:word"
xmlns="">';
}

function save($path)
{

print "";
$data = ob_get_contents();

ob_end_clean();

$this->wirtefile ($path,$data);
}

function wirtefile ($fn,$data)
{

$fp=fopen($fn,"wb");
fwrite($fp,$data);
fclose($fp);
}
}
/*-------word class End-------*/
$word=new word;
$word->start();
echo $cout;
$wordname="word/".time().".doc";
$word->save($wordname);//保存word并且结束.
?>


您输入的条件不足,请重新输入!
}
?>

阅读(1267) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~