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

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

(0)

相关推荐

  • PHP+DBM的同学录程序(1)

    这个同学录原来给我们班级用的,因为服务器没有mysql支持,就选择了dbm 国内还没有什么dbm程序,国外也几乎没有 花了一个晚上,在几乎没有任何参考的情况下写了出来 现在公布出来 是一个非常好的dbm使用范例 1.index.php3 <? if($login){ ?> <HTML> <HEAD> <TITLE>深圳中学2000届高中(12)班同学录</TITLE> <style type="text/css">

  • PHP+DBM的同学录程序(2)

    3.删除成员del.php3 <? require("common.php3"); $id=chop($id); if(!isset($id))error("请输入要删除的用户ID !"); elseif($pwd<>$adminpass)error("管理员密码错误!"); else{   $data=dbmopen("class","w");   dbmdelete($data,$id

  • PHP+DBM的同学录程序(3)

    6.登出文件logout.php3 <? setcookie("login",false,time()+31536000); header("location:login.php3"); ?> 7.修改信息文件modify.php3 <? require("common.php3"); $id=$login; if($submit){   if($name=="")error("请填写您的名字!&q

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

    8.注册文件reg.php3 <? require("common.php3"); require("mail.php3"); if($submit){   if($id=="")error("请填写您的注册用户名!");   elseif(!eregi("^[0-9a-zA_Z]+$",$id))error("你的用户名不能含有其他字符!");   elseif($passwor

  • PHP+DBM的同学录程序(5)

    10.会员信息显示文件show.php3 <? if($login){ require("common.php3"); if(!isset($id))error("怎么没有填写用户的ID?"); else{   $id=chop($id);   $dbm=dbmopen("class","r");   if(!dbmexists($dbm,$id))error("没有这个用户ID!");   else

  • DB2编程序技巧 (十)

    正在看的db2教程是:DB2编程序技巧 (十).4.11 db2环境变量 db2 重装后用如下方式设置db2的环境变量,以保证sp可编译 将set_cpl 放到AIX上, chmod +x set_cpl, 再运行之 set_cpl的内容 db2set DB2_SQLROUTINE_COMPILE_COMMAND="xlc_r  -g \ -I$HOME/sqllib/include SQLROUTINE_FILENAME.c \ -bE:SQLROUTINE_FILENAME.exp -e S

  • DB2编程序技巧 (九)

    正在看的db2教程是:DB2编程序技巧 (九).4.8 查看本instance下有哪些database db2 LIST DATABASE DIRECTORY  [ on /home/db2inst1 ] 4.9 查看及更改数据库head的配置 请注意,在大多数情况下,更改了数据的配置后,只有在所有的连接全部断掉后才会生效. 查看数据库head的配制 db2 get db cfg for head 更改数据库head的某个设置的值 4.9.1 改排序堆的大小 db2 update db cfg 

  • C++程序中使用Windows系统Native Wifi API的基本教程

    Windows应用想要实现连接wifi,监听wifi信号,断开连接等功能,用NativeWifi API是个不错的选择. 打开MSDN,搜索NativeWifi Api,找到Native Wifi页.在这里. 信息量很大,如果像我着急实现上述功能,看海量的文档有些来不及.如果直接给我例子,在运行中调试,阅读代码,效率会更高. 但是,我并没有成功.首先,Sample在SDK中,参见这里.我下载几次都失败了,最后放弃这条路.后来同事给了我一份Sample,我不敢确定是否就是这个,但是代码写的也是很晦

  • 杏林同学录(一)

    主要特点:    php+mysql,session页面保护,悄悄话功能,照片上传,在线修改资料,email查询及自动回复,客人模式,    方便的班级管理 程序清单: 配置部分:    配置文件:class/config.php 数据库文件:class/mysql.txt 计数器文件:class/counter.txt   主程序:    登陆首页:index.php 成员主页:main.php 客人主页:class/guest.php   个人管理:    班级通讯录:class/addre

  • Python3标准库之dbm UNIX键-值数据库问题

    1. dbm UNIX键-值数据库 dbm是面向DBM数据库的一个前端,DBM数据库使用简单的字符串值作为键来访问包含字符串的记录.dbm使用whichdb()标识数据库,然后用适当的模块打开这些数据库.dbm还被用作shelve的一个后端,shelve使用pickle将对象存储在一个DBM数据库中. 1.1 数据库类型 Python提供了很多模块来访问DBM数据库.具体选择的默认实现取决于当前系统上可用的库以及编译Python时使用的选项.特定实现有单独的接口,这使得Python程序可以与用其

随机推荐