<%@ codepage ="936" %>
  <% 
	data_path="../../" 'ACC连接数据库路径，对SQL无效
	numid="71"
	dir="../err.asp" 
  %>
  <!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
 <!--#include file="../rolecheck.asp"-->
 <%
 id=Replace_Text(request("id"))
  sortid=Replace_Text(request("sortid"))
 set rs=server.createobject("adodb.recordset")
sql="select * from Yixiang_class_2 where typeid="&id&""
 rs.open sql,conn,1,3
 if not rs.eof then 
topold=rs("top")
if topold=1 then
rs("top")=0
end if
if topold=0 then
rs("top")=1
end if
rs.update
rs.close
set rs=nothing
end if
conn.close
set conn=nothing
response.redirect "type.asp?sortid="&sortid&""
%>