ModifyNews_Class2.asp ASP+ACCESS中学网站设计与实现(论文+源代码+开题报告+任务书) - ASP源码程序

gusucode.com > ASP+ACCESS中学网站设计与实现(论文+源代码+开题报告+任务书) > ASP+ACCESS中学网站设计与实现(论文+源代码+开题报告+任务书)\ASP001中学网站设计与实现\zxweb\admin\ModifyNews_Class2.asp

    <!--#include file=conn.asp -->
<!--#include file=session.asp-->
<%
NewsID=Request.QueryString("NewsID")
BigClassID=Request.Form("BigClassID")

set rs=server.CreateObject ("ADODB.RecordSet")
rs.Source="select * from BigClass where BigClassID=" & BigClassID
rs.Open rs.source,conn,1,1

set rs2=server.CreateObject("ADODB.RecordSet")
rs2.Source="select * From SmallClass Where BigClassID=" & BigClassID
rs2.Open rs2.Source,conn,1,1
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/bodystyle.css" rel="stylesheet" type="text/css">
</head>

<body>

<p>　</p>
<form method="POST" action="ModifyNews_Class3_update.asp?NewsID=<%=NewsID%>">
<table border="0" width="588" align=center>
  <tr>
    <td colspan="2" width="588"><b>修改新闻类别（修改NewsID为<%=NewsID%>的新闻的类别）</b></td>
  </tr>
  <tr>
    <td colspan="2" width="588">
      <hr size="1">
    </td>
  </tr>
  <input type=hidden name=BigClassID value=<%=BigClassID%>>
  <tr>
    <td width="120" align="right">新的大类为：</td>
    <td width="468"><%=trim(rs("BigClassName"))%></td>
  </tr>
  <tr>
    <td width="120" align="right">所属小类：</td>
    <td width="468"><select size="1" name="SmallClassID">
     <%if rs2.EOF then %>    
          <option value=0>暂无任何小类</option>
     <%else
           while not rs2.EOF 
     %>
           <option value=<%=rs2("SmallClassID")%>><%=trim(rs2("SmallClassName"))%></option>
     <%
            rs2.MoveNext 
            wend
       end if
     %>
      </select></td>
  </tr>
    <tr>
    <td width="120"></td>
    <td width="468"></td>
  </tr>
  <tr>
    <td width="588" colspan=2><hr size=1></td>
  </tr>
  <tr>
    <td colspan="2" width="588" align="center"><input type="submit" value="  修改>>  " name="B1"></td>
  </tr>
</table>
</form>
</body>

</html>