PHP＋DBM的同学录程序(4)-侯体宗的博客

PHP＋DBM的同学录程序(4)
php / 管理员发布于 7年前 217

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);
?>

上一条：
PHP＋DBM的同学录程序(5)
下一条：
PHP＋DBM的同学录程序(1)

0条评论 (评论内容有缓存机制,请悉知!)

最新最热

相关文章
Laravel从Accel获得5700万美元A轮融资(0个评论)
PHP 8.4 Alpha 1现已发布！(0个评论)
用Time Warden监控PHP中的代码处理时间(0个评论)
在PHP中使用array_pop + yield实现读取超大型目录功能示例(0个评论)
Property Hooks RFC在PHP 8.4中越来越接近现实(0个评论)

近期文章
智能合约Solidity学习CryptoZombie第三课:组建僵尸军队(高级Solidity理论)(0个评论)
智能合约Solidity学习CryptoZombie第二课:让你的僵尸猎食(0个评论)
智能合约Solidity学习CryptoZombie第一课:生成一只你的僵尸(0个评论)
在go中实现一个常用的先进先出的缓存淘汰算法示例代码(0个评论)
在go+gin中使用"github.com/skip2/go-qrcode"实现url转二维码功能(0个评论)
在go语言中使用api.geonames.org接口实现根据国际邮政编码获取地址信息功能(1个评论)
在go语言中使用github.com/signintech/gopdf实现生成pdf分页文件功能(0个评论)
gmail发邮件报错:534 5.7.9 Application-specific password required...解决方案(0个评论)
欧盟关于强迫劳动的规定的官方举报渠道及官方举报网站(0个评论)
在go语言中使用github.com/signintech/gopdf实现生成pdf文件功能(0个评论)

近期评论
122 在
学历：一种延缓就业设计，生活需求下的权衡之选中评论工作几年后，报名考研了，到现在还没认真学习备考，迷茫中。作为一名北漂互联网打工人..
123 在
Clash for Windows作者删库跑路了，github已404中评论按理说只要你在国内，所有的流量进出都在监控范围内，不管你怎么隐藏也没用，想搞你分..
原梓番博客在
在Laravel框架中使用模型Model分表最简单的方法中评论好久好久都没看友情链接申请了，今天刚看，已经添加。..
博主在
佛跳墙vpn软件不会用?上不了网?佛跳墙vpn常见问题以及解决办法中评论 @1111老铁这个不行了，可以看看近期评论的其他文章..
1111 在
佛跳墙vpn软件不会用?上不了网?佛跳墙vpn常见问题以及解决办法中评论网站不能打开，博主百忙中能否发个APP下载链接，佛跳墙或极光..

Top