<%
    data_path="../../" 'ACC连接数据库路径，对SQL无效
 	numid="no"
	dir="no"
  %>
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/filesystem.asp"-->
<!--#include file="../../inc/safe.asp"-->
  <!--#include file="../rolecheck.asp"-->

 <%
  
keyid=Replace_Text(request("keyid"))
gsid=Replace_Text(request("gsid"))
action=Replace_Text(request("action"))
if keyid="" then 
  response.Write("<script>alert('对不起!参数传递错误!');history.back(-1);</script>")
 response.End()
end if
set rsc=server.CreateObject("adodb.recordset")
sqlc="select * from Websen_config_price"
rsc.open sqlc,conn,1,1
if not rsc.eof then 
if rsc("isopen")=1 then 
  response.Write("<script>alert('对不起!当前正在竞价阶段，无效的审核操作!');history.back(-1);</script>")
  response.End()
 else
 
 if action="1" then
 conn.execute "update Websen_temp_price set ispay=1 where id="&keyid
 elseif action="0" then
 
 conn.execute "update Websen_temp_price set ispay=0 where id="&keyid
 end if
 response.Redirect(request.ServerVariables("HTTP_REFERER"))
end if
rsc.close
end if

%>