在一个页面实现登录最好是创建一个下拉列表:
<%
If Request.ServerVariables("REQUEST_METHOD")="POST" Then
   Url=Request("Url")
   If Url="Teacher" Then
      Response.Redirect  '教师页面
   Else
      Response.Redirect  '管理页面 
   End If
End If
%><form name="form1" method="post" action="">
  <table width="40%" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td>用户名:</td>
      <td><input type="text" name="UserName"></td>
    </tr>
    <tr>
      <td>密码:</td>
      <td><input type="password" name="Pwd"></td>
    </tr>
    <tr>
      <td>用户类型:</td>
      <td><select name="select">
        <option value="teacher">教师登录</option>
        <option value="admin">管理登录</option>
      </select>
      </td>
    </tr>
    <tr>
      <td><input type="submit" name="Submit" value="登录"></td>
      <td><input type="reset" name="Submit2" value="重置"></td>
    </tr>
  </table>
</form>