<!-- #include file="conn.asp" -->
<!-- #include file="admin.asp" -->
<%Call Head()
Call saycardd("栏目移动")
IF KEY<>0 then
  Call Error("你的权限不足！")
  end if
id= int(request.QueryString("id"))  
  iid= int(request.QueryString("iid"))

if id="" or IsNumeric(id)=False then
  Call Error("ID无效！")
  end if
if iid="" or IsNumeric(iid)=False then
  Call Error("ID无效！")
  end if
   lxl= request.QueryString("lx")
  if clng(id)=clng(iid) then
  Call Error("不能转移同一栏目！")
  end if
     set rs=server.createobject("adodb.recordset")
sql = "select * from class Where classid="&id
rs.open sql,conn,1,3
if rs.eof then 
response.write("操作失败!没有此栏目")
else
if rs("parent")=iid then
  Call Error("不能转移同一栏目！")
  end if
rs("parent")=iid
rs.update()
response.write("移动栏目成功")
end if
rs.close
set rs=nothing
%>
<br/>----------<br/>
<%if id<>0 then %>
<a href="Clist.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>&amp;id=<%=id%>&amp;lx=0">[栏目分类]</a><br/>
<%end if%>
<a href="class.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>">[栏目管理]</a><br/>
<a href="index.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>">[后台管理]</a>
<%Call head1()%>