admin.asp

九酷网络个人主页系统破解版

<!--#include file="../conn.asp"-->
<%
if Request.Cookies("9cool_name")="" or Request.Cookies("9cool_pwd")="" or Request.Cookies("9cool_flag")="" then
ErrMsg("对不起，您还没有登录或登录超时，请重新登录！")
response.End
end if
If conn.Execute("select * from [manage_user] where username='"&Request.Cookies("9cool_name")&"' and password='"&Request.Cookies("9cool_pwd")&"' and lock=0").eof Then
Response.Cookies("9cool_name")=""
Response.Cookies("9cool_pwd")=""
Response.Cookies("9cool_time")=""
Response.Cookies("9cool_flag")=""
ErrMsg("出现未知错误，请重新登录！")
response.end
end if
function chk_admin_login(chk_flag)
if cint(Request.Cookies("9cool_flag")) < chk_flag then
ErrMsg("对不起，您没有权限执行此操作！")
response.End()
end if
end function
set rssys=server.createobject("adodb.recordset") 
sqlsys="select * from config" 
rssys.open sqlsys,conn,1,1
site=rssys("site")
siteurl=rssys("siteurl")
siteemail=rssys("siteemail")
mailtype=rssys("mailtype")
smtpname=rssys("smtpname")
smtppass=rssys("smtppass")
smtpserver=rssys("smtpserver") 
%>