登陆检验

来源:百度知道 编辑:UC知道 时间:2024/05/12 04:23:54
高手帮我看看错误啊~
<!--#include file="conn.asp"-->
<%Response.Buffer=True%>
<%
UserCountGet=request.form("UserCount")
UserPasswdGet=request.form("UserPasswd")
Set rs=Server.CreateObject("ADODB.Connection")
Sql ="Select * From puser where UserName='"&UserNameGet&"'and UserPasswd='"&UserPasswdGet&"'"
rs.open sql,MM_StudentConn_STRING,1,3
if Not (rs.bof and rs.eof) then

session("UserCount")=rs("UserCount")
session("UserName")=rs("UserName")
session("UserPasswd")=rs("UserPasswd")
session("UserAddress")=rs("UserAddress")
session("UserTele")=rs("UserTele")
session("UserEmail")=rs("UserEmail")
session("UserMemo")=rs("UserMemo")

<!--#include file="conn.asp"-->
<%
UserCount=trim(request.form("UserCount"))
UserPasswd=trim(request.form("UserPasswd"))
'用户名和密码验证
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from puser where UserCount="&UserCount&" and UserPasswd='"&UserPasswd&"'"
rs.open sql,MM_StudentConn_STRING,1,1
if rs.eof then
response.write "<script>alert('用户名或密码出错!');history.go(-1);</script>"
response.end
else
session("UserCount")=rs("UserCount")
session("UserName")=rs("UserName")
session("UserPasswd")=rs("UserPasswd")
session("UserAddress")=rs("UserAddress")
session("UserTele")=rs("UserTele")
session("UserEmail")=rs("UserEmail")
session("User