<%
name=replace(Request.Form("name"),"'","''")
passwd=replace(Request.Form("passwd"),"'","''")
strsql="SELECT * FROM login where Login_User='"&name&"'"
rs.open strsql, conn
If rs.EOF Then
Response.Write("alert('请核对用户名!');window.location.href='login.asp'")
rs.close
Response.End
End if
login_passwd=rs("Login_Passwd")
login_user=rs("Login_User")
rs.close
If Not(login_passwd=passwd) Then
Response.Write("alert('请核对密码!');window.location.href='login.asp'")
Response.End
Else
session("username")=login_user
Login_User=login_user
strsql="UPDATE login SET Login_LastDate='"&now&"' WHERE Login_User='"&Login_User&"'"
rs.open strsql,conn
rs.close
Set rs=nothing
Response.Write("alert('登录成功!');window.location.href='admin.asp'")
End if
%>
ADODB.Recordset 错误 '800a0e78'
对象关闭时,不允许操作。
/logistics/logon.asp,行 30