newscheck.asp

来自「zheng fu wang zhan gong neng qi quan」· ASP 代码 · 共 40 行

<!--#include file="conn.asp"-->
<!--#include file="ConnUser.asp"-->
<!--#include file="config.asp"-->
<!--#include file="char.inc"-->
<!--#include file="chkuser.asp" -->
<!--#include file="ChkURL.asp"-->
<%
if not(request.cookies(eChuang)("KEY")="super" or request.cookies(eChuang)("KEY")="check" or request.cookies(eChuang)("key")="typemaster" or request.cookies(eChuang)("key")="bigmaster") then
	Show_Err("对不起，您的后台管理权限不够操作！")
	response.end
else
	newsid=trim(request.QueryString("newsid"))
	set rs=server.createobject("adodb.recordset")
	sql="Select * from "& db_News_Table &" where newsID="&newsid
	rs.open sql,conn,1,3
	smallclassid=rs("smallclassid")
	bigclassid=rs("bigclassid")
	typeid=rs("typeid")
	if rs("checkked")=0 then
		rs("checkked")=1
	else
		rs("checkked")=0
	end if
	
	rs.update
	rs.close
	set rs=nothing
	conn.close
	set conn=nothing
	
	if smallclassid<>"" then
		Response.Redirect "ListNews.asp?SmallClassID="&smallclassid
	else if bigclassid<>"" then
		Response.Redirect "E_SmallNO.asp?BigClassID="&bigclassid
		else
			Response.Redirect "E_bigclassNO.asp?typeID="&typeid
		end if
	end if
end if
%>