⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 e_voteset.asp

📁 zheng fu wang zhan gong neng qi quan
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="ConnUser.asp"-->
<!--#include file="config.asp"-->
<!--#include file="char.inc"-->
<!--#include file="ChkUser.asp" -->
<!--#include file="ChkManage.asp" -->
<%
IF not(request.cookies(eChuang)("ManageKEY")="super" or request.cookies(eChuang)("ManageKEY")="bigmaster" or request.cookies(eChuang)("ManageKEY")="check" or request.cookies(eChuang)("ManageKEY")="typemaster") THEN
	Show_Err("对不起,您的管理权限不够!")
	response.end
else
	if votemana="1" or (request.cookies(eChuang)("ManagePurview")="99999" and request.cookies(eChuang)("purview")="99999") then
		Checked=ChkRequest(request.form("Checked"),1)	'防注入
		if Checked="" then
			Show_Err("对不起,您必须选择一个投票项!<br><br><a href='javascript:history.back()'>回去重来</a>")
			Response.End 
		end if
		conn.execute "update "& db_Vote_Table &" set IsChecked=0"

		set rs=server.createobject("adodb.recordset")
		sql="Select * from "& db_Vote_Table &" where ID="&Checked
		rs.open sql,conn,1,3
		if not rs.EOF then
			do while not rs.EOF 
				rs("isChecked")=1
			rs.MoveNext 
			loop
		end if
		rs.close
		set rs=nothing
		conn.close
		set conn=nothing
		response.redirect "E_VoteManage.asp"
	else
		Show_Err("对不起,该功能已经被超级系统管理员关闭,您没有权限操作!")
		response.end
	end if
end if
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -