<!--#include file="mdb.asp"-->
<!--#include file="inc/config.asp"-->
<%
if session("adminlogin")<>sessionvar then
  Response.Write("<script language=javascript>alert('你尚未登录，或者超时了！请重新登录');this.top.location.href='/admin.asp';</script>")
  response.end
else
if request.querystring("id")="" then
  Response.Write("<script language=javascript>alert('你必须指定操作的对象！');history.back(1);</script>")
  response.end
else
if request.QueryString("hx66")="checkhy" then'审核黄页
sql="select * from hy where hy_id="&cint(request.querystring("id"))
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if request.querystring("action")="pass" then'审核通过
rs("passed")=0
rs.update
tjuser=rs("tjuser")
sql="UPDATE [user] SET points = points + "&fbpoints&" where username='"&tjuser&"'"
conn.execute (sql)
elseif request.querystring("action")="del" then'删除审核
rs.delete
end if
rs.close
set rs=nothing
response.redirect "admin_hy.asp?action=cat"
end if

if request.QueryString("hx66")="checkgq" then'审核供求
sql="select * from gq where gq_id="&cint(request.querystring("id"))
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if request.querystring("action")="pass" then'审核通过
rs("passed")=0
rs.update
tjuser=rs("tjuser")
sql="UPDATE [user] SET points = points + "&fbpoints&" where username='"&tjuser&"'"
conn.execute (sql)
elseif request.querystring("action")="del" then'删除审核
rs.delete
end if
rs.close
set rs=nothing
response.redirect "admin_gq.asp?action=gq"
end if
end if
end if
%>

