WEB开发网
开发学院WEB开发PHP PHP+DBM的同学录程序(4) 阅读

PHP+DBM的同学录程序(4)

 2001-02-05 16:32:51 来源:WEB开发网   
核心提示:8、注册文件reg.php3 <? require("common.php3"); require("mail.php3"); if($submit){ if($id=="")error("请填写您的注册用户名!"); elseif(
8、注册文件reg.php3
<?
require("common.php3");
require("mail.php3");
if($submit){
 if($id=="")error("请填写您的注册用户名!");
 elseif(!eregi("^[0-9a-zA_Z]+$",$id))error("你的用户名不能含有其他字符!");
 elseif($passWord=="")error("请填写您的密码!");
 elseif($password<>$password1)error("您的密码填写不正确!");
 elseif($name=="")error("请填写您的名字!");
 elseif($mail=="")error("请填写您的邮件地址!");
 else{
  $dbm=dbmopen("class","w");
  if(dbmexists($dbm,$id))error("这个用户名已经给别人注册了!");
  else{
   $intro=nl2br($intro);
   $data="$name|!:!|$nickname|!:!|$mail|!:!|$home|!:!|$oicq|!:!|$icq|!:!|$add|!:!|$tel|!:!|$birth|!:!|$job|!:!|$intro|!:!|$sex";
   dbminsert($dbm,$id,$data);
   $pwd=dbmopen("password","w");
   dbminsert($pwd,$id,$password);
  }
  dbmclose($dbm);
  $sendmsg="欢迎注册《深圳中学2000届高中(12)班同学录》n";
  $sendmsg.="下面是您的注册信息:n";
  $sendmsg.="用户名:$idn用户密码;$passwordn";
  $sendmsg.="=====================================================";
  $sendmsg.="注册姓名:$namen注册昵称:$nicknamen注册邮箱:$mailn主页地址:$homen";
  $sendmsg.="您的OICQ:$oicqn您的 ICQ:$icqn联系地址:$addn联系电话:$teln";
  $sendmsg.="您的生日:$birthn您的职业:$jobn您的性别;$sexn您的个人介绍:n$intronn";
  $sendmsg.="======================================================";
  $sendmsg.="欢迎注册《深圳中学2000届高中(12)班同学录》";
  $sendmsg.="登陆地址:http://5212.net/class/";
  mail2("欢迎注册《深圳中学2000届高中(12)班同学录》",$sendmsg,$mail);
  header("Location:index.php3");
 }
}else{
?><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>同学录用户注册</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<link rel="stylesheet" href="style.CSS">
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
</HEAD><BODY bgcolor="#FFFFFF" topMargin=0>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%"><BR>
<DIV align=center></DIV><CENTER><TBODY></TBODY></center>
 </TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="60%" align="center">
<TBODY> <TR vAlign=top>
  <TD bgColor=#000000 width="100%" height="336"> 
   <DIV align=center>
    <TABLE border=0 cellPadding=4 cellSpacing=1 height=390 width=586>
     <TBODY> 
     <TR> 
      <TD align=middle bgColor=#2f5e8c colSpan=2 height=14 vAlign=top><form method="POST" action="reg.php3"> <FONT color=#ffffff>注册同学录</FONT></TD>
     </TR>
     <TR> 
      <TD align=middle bgColor=#ffffff height=25 width=150>注册用户名: </TD>
      <TD align=left bgColor=#ffffff height=25 width=400> 
       <INPUT class=stedit maxLength=10 name=id size=23>
       *必须填写</TD>
     </TR>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的密码: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=10 name=password size=23 type="password">
       *必须填写 </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>重复密码: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input type="password" class="stedit" name="password1" size="23" value="">
       *必须填写 </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>NickName: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=20 name=nickname size=23>
      </td>
     </tr>
     <TR> 
      <TD align=middle bgColor=#ffffff height=25 width=121>电子邮件: </TD>
      <TD align=left bgColor=#ffffff height=25 width=486> 
       <INPUT class=stedit maxLength=30 name=mail size=23>
       *必须填写 </TD>
     </TR>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的OICQ: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=9 name=oicq size=23>
      </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的主页: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=50 name=home size=23 value="http://">
      </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的 ICQ: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=10 name=icq size=23>
      </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的名字: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=10 name=name size=23>
       *必须填写 </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的电话: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=20 name=tel size=23>
      </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>出生日期: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=11 name=birth size=23>
       *类似2000-10-10 </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>联系地址: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <input class=stedit maxlength=50 name=add size=23>
      </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的职业: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <select name="job">
        <option value="学 生">学 生</option>
        <option value="老 师">老 师</option>
        <option value="其 他">其 他</option>
       </select>
      </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>您的性别: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <select name="sex">
        <option value="俊 男">俊 男</option>
        <option value="靓 女">靓 女</option>
        <option value="其 他">其 他</option>
       </select>
      </td>
     </tr>
     <tr> 
      <td align=middle bgcolor=#ffffff height=25 width=121>个人简介: </td>
      <td align=left bgcolor=#ffffff height=25 width=486> 
       <textarea class="stedit" name="intro" cols="40" rows="4"></textarea>
      </td>
     </tr>
     <TR bgColor=#ffedc8> 
      <TD bgColor=#ffffff colSpan=2> 
       <div align="center"> 
        <input type="submit" name="submit" value="确认申请" class="stbtm">
         
        <input type="reset" name="reset" value="注册重置" class="stbtm">
       </div></form>
      </TD>
     </TR>
     </TBODY> 
    </TABLE>
   </DIV></TR></TBODY></TABLE><BR><TR><TD></TD></TR>
</BODY>
</HTML>
<?
}
?>

9、建立数据库的文件run.php3
<?

$dbm=dbmopen("class","c");
dbmclose($dbm);
$dbm=dbmopen("password","c");
dbmclose($dbm);
?> 

Tags:PHP DBM 同学录

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接