<!--#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错误啊
IP卡
狗仔卡
发表于 2010-1-13 04:05:40
收藏
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡