<!--#include file=CONN.ASP-->
<!--#include file=cookies.asp-->
<%
dim  rsa,sqla,xxxx
xxxx=trim(request("selectedid"))
set rsa=server.createobject("adodb.recordset")
sqla="select shi from [FOX_dian] where id="&xxxx&""
rsa.open sqla,conn,1,1
if  rsa("shi")<>session("admin_shi") then
response.Write "<script LANGUAGE='javascript'>alert('您管理的范围超过了您的地区！');" & "window.location='dian.asp'" & "</script>"
response.end
else

dim rs,sql,id,i,str2
id=trim(request("selectedid"))
str2=split(id,",")
for i=0 to ubound(str2)
set rs=server.createobject("adodb.recordset")
sql="select yz,fbsj from [FOX_dian] where id="&trim(str2(i))
rs.open sql,conn,1,3
if rs("yz")=0 then
rs("yz")=1
elseif rs("yz")=1 then
rs("yz")=0
end if
rs("fbsj")=now()
rs.update
next
response.write "<script language=JavaScript>" & chr(13) & "alert('记录已经通过验证！');" &"window.location='dian.asp'" & "</script>"
end  if%>