<!-- #include file="conn.asp" -->
<!--#include file="../../admin/checkUser.asp"-->
<html>
<title>资料更改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body background="../../admin/bg_line.gif">
 
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#005DF9">
<tr><td>
        
      <table border="0" width="100%" cellpadding="3" cellspacing="1" bordercolordark="#FFFFFF" bordercolorlight="#999999" align="center">
        <tr align=center> 
          <td height="25" colspan="4" background="images/iebg.gif"><strong><font color="#FFFFFF">香车美女图片分类</font></strong></td>
        </tr>
        <tr bgcolor="#E0E6EC"> 
          <td width="15%" align="center" bgcolor="#E0E6EC">删除分类 </td>
          <td align="left"><form name="delclass" method="post" action="dell.asp">
              <input type="hidden" name="action" value="delclass">
              <select name="id" size="1">
                <option selected>选择分类</option>
                <%
	set rs=server.CreateObject("ADODB.RecordSet")
	sql="select * from class"
	rs.open sql,conn,1,1
	response.Write(rs.recordcount)
	for i=1 to rs.recordcount
	%>
                <option value="<%=rs("id")%>" ><%=rs("class_name")%></option>
                <%
	rs.movenext
	next
	rs.close
	Set rs=nothing
	%>
              </select>
              <input type="submit" name="Submit" value="删除">
          </form></td>
          <td width="15%" align="center" bgcolor="#E0E6EC">添加分类</td>
          <td align="left">   <form action="classok.asp" method="post" name="addclass" >
              <div align="center"> 
                <input name="action" type="hidden" value="addclass">
                <input name="class_name" type="text"  value="分类名">
                <input name="Submit" type="submit"  value="添加">
              </div>
          </form> </td>
        </tr>
        <tr bgcolor="#E0E6EC"> 
          <td width="15%" align="center" bgcolor="#E0E6EC"> 修改分类</td>
          <td width="35%" align="left"><font color="#333333">
            <%
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="Select * From class"
rs.open sql,conn,1,1
for i=1 to rs.RecordCount
%>
            <%=rs("class_name")%> <a href="pclassedit.asp?id=<%=rs("id")%>"><font color="#FF0000">改名字</font></a><br>
            <span class="font"> 
            <%
rs.movenext
next
rs.close
Set rs=nothing
conn.close
Set conn=nothing
%>
          </span></font> </td>
          <td width="15%" align="center" bgcolor="#E0E6EC">说明：</td>
          <td width="35%" align="left">删除分类要注意，删除了分类就会删除分类下的图片。请慎重选择。</td>
        </tr>
        <tr bgcolor="#E0E6EC"> 
          <td colspan="4" align="center"> 
            <input type="submit" name="Submit" value="提交" class=input>
            &nbsp;&nbsp; 
          <input type="reset" name="Submit2" value="清除" class=input>          </td>
        </tr>
      </table>
    </td></tr></table>
</body>
</html>