PHP＋DBM的同学录程序(2)
2016-01-29 14:28
PHP＋DBM的同学录程序(2),PHP＋DBM的同学录程序(2)
<?
require("common.php3");
$id=chop($id);
if(!isset($id))error("请输入要删除的用户ID ！");
elseif($pwd<$adminpass)error("管理员密码错误！");
else{
$data=dbmopen("class","w");
dbmdelete($data,$id);
dbmclose($data);
$data=dbmopen("password","w");
dbmdelete($data,$id);
dbmclose($data);
header("location:index.php3");
}
?
4、公用文件common.php3
<?
$adminpass="test";
function error($msg){
?
<html<head<meta http-equiv="Content-Type" content="text/html; charset=gb2312"
<link rel="stylesheet" href="style.css"<title同学录 出错</title</head<body bgcolor="#ffffff"
<html<head</head<body bgcolor="#FFFFFF"<center<table border="0" width="80%" height="80%" cellspacing="0" cellpadding="0"
<tr<td width="100%"<table border="0" width="100%" bgcolor="#000000" cellspacing="0" cellpadding="0"
<tr<td width="100%"<table border="0" cellspacing="1" width="100%" align=left height="320"
<tr<td width="100%" bgcolor="#FFB500" align=center height="31"<font color="#804000"<span style="font-size: 11pt"同学录 出错</span</font</td
</tr<tr<td width="100%" align=left height="247" bgcolor="#F7F7F7"<span style="font-size: 11pt"<p align="center"
出错原因：<font color="#FF0000"<? echo $msg;?</font</p<p align="center"<a href="javascript:history.go(-1);"<font color="#000000"请点这里返回上一页检查你的输入是否有误</font</a</p
<p align="center"[ <a href="javascript:history.go(-1);"返回上一页</a ]</p</span</td</tr<tr<td width="100%" bgcolor="#FFB500" height="30"<p align="right"<span
style="font-size: 9pt"<font color="#804000"Copyright 200x y10k </font<font face="Arial" color="#804000".Allrights reserved.</font</span</td
</tr</table</td</tr</table</td</tr</table</center</body</html
<?
}
?
5、登陆文件login.php3
<?
require("common.php3");
if($submit){
$id=chop($id);
if($id=="")error("请输入您的用户名称！");
else{
$dbm=dbmopen("password","r");
if(!dbmexists($dbm,$id))error("没有这个用户名称！");
else{
$pass=dbmfetch($dbm,$id);
if($pass==$password){
setcookie("login",$id,time()+31536000);
header("location:index.php3");
}else error("您的密码不对！如果忘记密码，请使用忘记密码功能！");
}
dbmclose($dbm);
}
}else{
?
<html
<head
<title深圳中学2000届高中（12）班同学录:::版权所有：辛湜@深圳中学2000届高中（12
