对象模型：

 

 

 

 

用户注册页面

核心代码1：检查新用户名

运行环境：Dreamweaver CS6

<%
' *** Redirect if username exists
MM_flag = "MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
  Dim MM_rsKey
  Dim MM_rsKey_cmd
  
  MM_dupKeyRedirect = "registbad.html"
  MM_dupKeyUsernameValue = CStr(Request.Form("ID"))
  Set MM_rsKey_cmd = Server.CreateObject ("ADODB.Command")
  MM_rsKey_cmd.ActiveConnection = MM_conn_STRING
  MM_rsKey_cmd.CommandText = "SELECT ID FROM dbo.users WHERE ID = ?"
  MM_rsKey_cmd.Prepared = true
  MM_rsKey_cmd.Parameters.Append MM_rsKey_cmd.CreateParameter("param1", 200, 1, 12, MM_dupKeyUsernameValue) ' adVarChar
  Set MM_rsKey = MM_rsKey_cmd.Execute
  If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then 
    ' the username was found - can not add the requested username
    MM_qsChar = "?"
    If (InStr(1, MM_dupKeyRedirect, "?") >= 1) Then MM_qsChar = "&"
    MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
    Response.Redirect(MM_dupKeyRedirect)
  End If
  MM_rsKey.Close
End If
%>

核心代码2：插入记录    

运行环境：Dreamweaver CS6

<form id="form1" name="form1" method="POST" action="<%=MM_editAction%>">
  <p align="center">&nbsp; </p>
  <p align="center">英 语 学 习 网 站</p>
  <p align="center">&nbsp;</p>
  <p align="center"><strong>用 户 注 册  </strong>  </p>
  <div align="center">
    <table width="260" border="0">
      <tr>
        <td width="75">用户名：</td>
        <td width="169"><label>
          <input type="text" name="ID" id="ID" />
        </label></td>
      </tr>
      <tr>
        <td>密 &nbsp;&nbsp;&nbsp;码：</td>
        <td><label>
          <input type="text" name="Pwd" id="Pwd" />
        </label></td>
      </tr>
      <tr>
        <td>姓 &nbsp;&nbsp;&nbsp;名：</td>
        <td><label>
          <input type="text" name="Name" id="Name" />
        </label></td>
      </tr>
      <tr>
        <td>邮 &nbsp;&nbsp;&nbsp;箱：</td>
        <td><label>
          <input type="text" name="Email" id="Email" />
        </label></td>
      </tr>
      <tr>
        <td>手机号：</td>
        <td><label>
          <input type="text" name="Tel" id="Tel" />
        </label></td>
      </tr>
    </table>
  </div>
  <p align="center">
    <input type="submit" name="button" id="button" value="注册" />
    <input type="reset" name="button2" id="button2" value="重置" />
    
    <input type="hidden" name="MM_insert" value="form1" />
  </p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
</form>

用户登录页面

核心代码：用户登录验证

运行环境：Dreamweaver CS6

<form id="form1" name="form1" method="POST" action="<%=MM_LoginAction%>">
  <p align="center">&nbsp;</p>
  <p align="center">英 语 学 习 网 站</p>
  <p align="center">&nbsp;</p>
  <p align="center"><strong>用 户 登 录 </strong></p>
  <p align="center">
    <label>
      <div align="left"></div>
    </label>
  </p>
  <div align="center">
    <table width="340" border="0">
      <tr>
        <td width="77">用户名： </td>
        <td width="253"><input type="text" name="ID" id="ID" />
          <a href="regist.asp">注册</a></td>
      </tr>
      <tr>
        <td><label>密 &nbsp;&nbsp;&nbsp;码： </label></td>
        <td><input type="password" name="Pwd" id="Pwd" />
          <a href="zhaohuimima.asp">          找回密码</a></td>
      </tr>
    </table>
  </div>
  <p align="center">
    <input type="submit" name="button" id="button" value="登录" />
    <input type="reset" name="button2" id="button2" value="重置" />
  </p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
  <p align="center">&nbsp;</p>
</form>