<!--#include file="conn.asp"-->
<!--#include file="adminset.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='login.asp';</script>"
response.End
end if
if session("flag")>2 then
response.Write "<div align=center><font size=80 color=red><b>您没有此项目管理权限！</b></font></div>"
response.End
end if
if qx3<>1 then
response.Write "<div align=center><font size=80 color=red><b>您没有此项目管理权限！</b></font></div>"
response.End
end if
%>
<html>
<head>
<title>网软志成在线购物系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<link href="../css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {color: #FF0000}
-->
</style>
</head>

<body>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/right_top2.gif">
  <tr>
    <td width="1%">&nbsp;</td>
    <td width="99%"><table width="100%" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="99%" height="28"><table width="100%" border="0" cellspacing="0" cellpadding="5">
            <tr>
              <td width="77%" height="27" style="font-size:14px;color:#ffffff">&nbsp;<strong><font color="#000000">网软志成购物后台管理系统 &gt;&gt; 分类管理 &gt;&gt; 商品类别转移 </font></strong></td>
              <td width="23%" style="font-size:14px;color:#ffffff"><span class="STYLE1">* 为必添项目</span></td>
            </tr>
        </table></td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="1%" height="28">&nbsp;</td>
    <td width="99%"><table width="100%" border="0" cellspacing="0" cellpadding="5">
      <tr>
        <td height="27" style="font-size:12px;color:#ffffff">&nbsp;<font color="#000000">操作说明：类别的转移会同时让该类别下的所有商品同步转移。</font></td>
      </tr>
    </table></td>
  </tr>
</table>
<br>
<table width="95%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#999999">
  <form name="form1" method="post" action="moveclass_save.asp">
    <tr bgcolor="#F3F3F3">
      <td width="28%"><div align="right">请选择您要转移的子类：</div></td>
      <td width="72%"><select name="xclassid" size="1" class="wenbenkuang" id="xclassid" >
        <%set rs=server.CreateObject("adodb.recordset")
                rs.Open "select id,xclass from shop_xclass order by id",conn,1,1
                if rs.EOF and rs.BOF then
                response.Write "<option value=0>还没有分类</option>"
                else
                do while not rs.EOF
                %>
        <option value="<%=int(rs("id"))%>"><%=trim(rs("xclass"))%></option>
        <%rs.MoveNext
                loop
                rs.Close
                set rs=nothing
                end if%>
      </select>
      </td>
    </tr>
    <tr bgcolor="#F3F3F3">
      <td><div align="right">请选择您要转移的小类：</div></td>
      <td width="72%">        <select name="nclassid" size="1" class="wenbenkuang" >
          <%set rs=server.CreateObject("adodb.recordset")
                rs.Open "select nclassid,nclass from shop_nclass order by nclassid",conn,1,1
                if rs.EOF and rs.BOF then
                response.Write "<option value=0>还没有分类</option>"
                else
                do while not rs.EOF
                %>
          <option value="<%=int(rs("nclassid"))%>"><%=trim(rs("nclass"))%></option>
          <%rs.MoveNext
                loop
                rs.Close
                set rs=nothing
                end if%>
      </select></td>
    </tr>
    <tr bgcolor="#F3F3F3">
      <td><div align="right">请选择所属大类：</div></td>
      <td>
        <select name="anclassid" size="1" class="wenbenkuang">
          <%set rs=server.CreateObject("adodb.recordset")
                rs.Open "select anclassid,anclass from shop_anclass order by anclassidorder",conn,1,1
                if rs.eof and rs.bof then
                response.Write "<option value=0>还没有分类</option>"
                else
                do while not rs.eof
                %>
          <option value="<%=int(rs("anclassid"))%>"><%=trim(rs("anclass"))%></option>
          <%rs.movenext
                loop
                rs.close
                set rs=nothing
                end if%>
        </select>
      </td>
    </tr>
    <tr bgcolor="#F3F3F3">
      <td height="30" colspan="2">
        <div align="center">
          <input type="submit" name="Submit" class="go-wenbenkuang" value="确定转移">
      </div></td>
    </tr>
  </form>
</table>
<p>&nbsp;</p>
<!--#include file="copyright.asp"-->
</body>
</html>
