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

<% 
 id=Replace_Text(request("id"))
 

conn.execute "update Websen_GuestBook set pass=1 where id="&id 
%>
<iframe src="../../manage/makehtml/feedback/makelist.asp?all=all" width="0" height="0"></iframe>
<%
conn.close
set conn=nothing

response.Redirect(request.ServerVariables("HTTP_REFERER"))
%>