<% '================================== ' 用户登录页面 ' 更新时间: 2006-5-29 '================================== If Request.QueryString("action") = "logout" Then logout(True) %>

退出系统
退出登录成功
单击返回首页


<% ElseIf Request.Form("action") = "login" Then Dim loginUser loginUser = login(Request.Form("UserName"), Request.Form("Password")) %>

<%=loginUser(0)%>
<%=loginUser(1)%>


<% Else %>

用户登录



　　
　


<%End if%>