<!-- #include file="../conn.asp" -->
<!-- #include file="admin.asp" -->
<%Call Head()
call saycarda("文件移动")
%>


<%id= int(request.QueryString("id"))  
  lid= int(request.QueryString("lid"))
  idd=request.querystring("idd")
        set rs=server.createobject("adodb.recordset")
sql = "select * from xzfile Where id="&id
rs.open sql,conn,1,3
if rs.eof then 
response.write("操作失败!没有此分类")
else
rs("lid")=lid
rs.update()
response.write("移动分类成功")
end if
rs.close
set rs=nothing
%>
<br/>----------<br/>
<a href='wjdl.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>&amp;idd=<%=idd%>'>[文件小类]</a><br/>
<a href='wjclass.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>[文件大类]</a><br/>
<a href="wzjl.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>">[文件管理]</a><br/>
<a href="../index.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>">[后台管理]</a>
<%call headsay()%>