  <% 
	data_path="../../" 'ACC连接数据库路径，对SQL无效
	numid="52"
	dir="../err.asp" 
  %>
<!--#include file="../head.asp"-->
<%
id=request.QueryString("id") '会员ID
userid=trim(request("bb"))   '类型ID
user=trim(request("aa"))     '类型名称

set rs=server.CreateObject("adodb.recordset")
sql="select leixing from websen_corporation where id="&id
rs.open sql,conn,1,3
if rs("leixing") = 1 then
rs("leixing")=0
rs.update
rs.close
response.write("<script language='javascript'>alert('取消审核成功！');window.location.href='xianshi.asp?gradename="&user&"&gradeid="&userid&"'</script>")
else
response.write("<script language='javascript'>alert('错误参数传递！');window.location.href='xianshi.asp?gradename="&user&"&gradeid="&userid&"'</script>")
end if
rs.close
%>