´ó¼Ò°ï°ï²ËÄñż°É

Ôµ·ÖÌì¿Õ

<!--#include file="conn1.asp"--> <!--#include file="function.asp"--> <% username=Checkin(trim(Request.form("username"))) password=Checkin(trim(Request.form("password"))) if username="" or password="" then Response.Redirect ("index.asp")
set rs=server.createobject("adodb.recordset") sql="select * from admin where username='"&username&"'and password='"&password&"'" rs.open sql,conn1,1,3 if not rs.EOF then rs("LoginTimes")=rs("LoginTimes")+1 rs("LoginTime")=now() rs("LoginIP")=Request.ServerVariables("REMOTE_ADDR") rs.Update
Session("AdminID")=rs("id") Session("IsAdmin")=true Session("KEY")=rs("oskey") Session.timeout=900 Response.Redirect ("admin.asp") else errmsg="ÇëÊäÈëÕýÈ·µÄ¹ÜÀíÔ±Ãû×ÖºÍÃÜÂ룡" call error() Response.End end if rs.close set rs=nothing conn1.close set conn1=nothing %> »á³öÏÖ500´íÎó°¡