<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>节目管理</title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<script language="javascript">
<!--
   function test(form) {
       if ((form.options.value == "rename" && form.reTitle.value == "") || (form.options.value == "new" && form.newTitle.value == ""))
       {alert("您没有填写专题名称，请填写");return false;}
       if (form.options.value == "del")
       {return confirm("将同时删除该专题中的所有内容！是否继续？");}
       return true;
    }
//-->
</script>
<body bgcolor="#800000">
<br>
<form method="POST" action="classmana1.asp" align="center" language="javascript" onSubmit="return test(this);">
<input type="hidden" name="options" value>
  
 <table border="0" cellpadding="0" cellspacing="1" width="95%" align="center">

    <tr>
      
 <td align="center" bgcolor="#008000" bordercolor="#000000">
 <p><font color="#FFFFFF">类别：</font>   
  <select name="subject" size="1"
      style="font-size: 9pt">
<%
         Do while not rs.eof
             response.write "<option value='" +  Cstr(rs("classid")) + "'>" + rs("class") + "</option>"
             rs.MoveNext
         Loop
%>
      </select>
      <input type="submit" value="删除" name="B2" class=buttonface onClick="form.options.value='del'" >  
 </td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">&nbsp;</td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">
 <p><font color="#FFFFFF">新名字：</font> 
<input type="text" name="reTitle" size="20" class=smallinput>
      <input type="submit" value="改名" name="B1" class=buttonface onClick="form.options.value='rename'"> 
      </td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">&nbsp;</td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">
 <p><font color="#FFFFFF">新类别：</font> 
<input type="text" name="newTitle" size="20" class=smallinput>
      <input type="submit" value="新增" name="B3" class=buttonface onClick="form.options.value='new'"></td> 
    </tr>
  </table>
</form>

<form method="POST" action="classmana2.asp" align="center" language="javascript" onSubmit="return test(this);">
<input type="hidden" name="options" value>
  
 <table border="0" cellpadding="0" cellspacing="1" width="95%" align="center">
    <tr>
      
 <td align="center" height="22" bgcolor="#008000"><b><font color="#FFFFFF">子专题管理</font></b></td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">&nbsp;</td>
    </tr>
    <tr>
      
 <td align="center" bgcolor="#008000">
 <p><font color="#FFFFFF">子专题：</font>  
  <select name="subject" size="1"
      style="font-size: 9pt">
<%
         Do while not rs2.eof
             response.write "<option value='" +  Cstr(rs2("Nclassid")) + "'>" + rs2("Nclass") + "</option>"
             rs2.MoveNext
         Loop
%>
      </select>
      <input type="submit" value="删除" name="B2" class=buttonface onClick="form.options.value='del'"> 
 </td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">&nbsp;</td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">
 <p><font color="#FFFFFF">专题修改： 
<input type="text" name="reTitle" size="20"  class=smallinput>
在 <select name="classid" size="1" 
      style="font-size: 9pt">
<%
         rs.MoveFirst
         Do while not rs.eof
             response.write "<option value='" +  Cstr(rs("classid")) + "'>" + rs("class") + "</option>"
             rs.MoveNext
         Loop
%>
      </select> 中  
      <input type="submit" value="改名" name="B1" class=buttonface onClick="form.options.value='rename'"><br>(请选择上方相应子类别,然后输入新名字和选择类别)</font>
      </td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">&nbsp;</td>
    </tr>
    <tr align="center">
      
 <td bgcolor="#008000">
 <p><font color="#FFFFFF">新专题：</font> 
<input type="text" name="newTitle" size="20"  class=smallinput>
 <font color="#FFFFFF">在</font> <select name="psubject" size="1" 
      style="font-size: 9pt">
<%
         rs.MoveFirst
         Do while not rs.eof
             response.write "<option value='" +  Cstr(rs("classid")) + "'>" + rs("class") + "</option>"
             rs.MoveNext
         Loop
%>
      </select>  <font color="#FFFFFF">中 </font>
      <input type="submit" value="新增" name="B3" class=buttonface onClick="form.options.value='new'"></td>
    </tr>
  </table>
</form>
</body>
</html>
<% 
     rs.close
     rs2.close
     conn.close
     set conn=nothing
end if
%>