PHP＋DBM的同学录程序(2)


3、删除成员del.php(做为现在的主流开发语言)3 
<? 
require("common.php(做为现在的主流开发语言)3"); 
$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.php(做为现在的主流开发语言)3"); 
} 
?> 

4、公用文件common.php(做为现在的主流开发语言)3 
<? 
$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.php(做为现在的主流开发语言)3 
<? 
require("common.php(做为现在的主流开发语言)3"); 
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.php(做为现在的主流开发语言)3"); 
      }else error("您的密码不对！如果忘记密码，请使用忘记密码功能！"); 
    }

补充：Web开发 , php ,