setting.asp

来自「全球商务网站系统介绍 GLOBALEC.COM.CN[生成HTML版] 」· ASP 代码 · 共 44 行

<%@ codepage ="936" %>
<%
if Request.Cookies("globalec")("globalecmaster")="" or Request.Cookies("globalec")("masterflag")="" then
response.write "<script language='javascript'>"
response.write"this.location.href='../login.asp';</SCRIPT>" 
response.end
end if
if instr(Request.Cookies("globalec")("masterflag"),"91")=0 then
response.redirect "../err.asp"
response.end
end if
%>
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp" -->
<%
if Chkrequest(request("id")) then
id=request("id")
else
Response.Redirect ("/login/chklogin.asp?login=4")
end if
if Chkrequest(request("sortid")) then
sortid=request("sortid")
else
Response.Redirect ("/login/chklogin.asp?login=4")
end if

set rs=server.createobject("adodb.recordset")
sql="select * from class_2 where typeid="&id&""
'response.write sql 
rs.open sql,conn,1,3
topold=rs("top")
if topold=1 then
rs("top")=0
end if
if topold=0 then
rs("top")=1
end if
rs.update
rs.close
set rs=noting
conn.close
set conn=nothing
response.redirect "type.asp?sortid="&sortid&""
%>