www.gusucode.com > 漂亮的地方旅游景点景观介绍网站源代码 > admin/config.asp

    <!--#include file="../inc/const.asp" -->
<!--#include file="inc/fun.asp" -->
<!--#include file="../conn.asp" -->
<%
dim rs
session.Timeout=120

'身份验证
if request.cookies(fmid)("admin_name")="" or request.cookies(fmid)("admin_psw")="" then
Response.Write("<script>parent.window.location.href='/"&hturl&"/index.asp';</script>")
end if
set rs=conn.execute("select * from Jw_admin where admin_name='"&request.cookies(fmid)("admin_name")&"'")
if rs.eof then
Response.Write("<script>parent.window.location.href='/"&hturl&"/index.asp';</script>")
else
if rs("admin_psw")<>request.cookies(fmid)("admin_psw") then
Response.Write("<script>parent.window.location.href='/"&hturl&"/index.asp';</script>")
end if
end if
call recordend(rs)

dim fid
fid=Trim(Request.QueryString("fid"))
if fid="" then 
fid =0 
end if

dim action,id
action=request("action")
if action="" then 
action=Trim(Request("actions"))
end if
id=request("id")

if id<>"" then 
id=int(id)
end if

dim sql
sql=""

dim creater
creater=request.cookies(fmid)("admin_name")
%>
<link href="/<%= hturl %>/inc/mm.css" rel="stylesheet" type="text/css" />
<script language="javascript" src="/<%= hturl %>/inc/main.js"></script>
<script language="javascript" src="/<%= hturl %>/inc/ajaxrequest.js"></script>