www.gusucode.com > ASP+ACCESS中学网站设计与实现(论文+源代码+开题报告+任务书) > ASP+ACCESS中学网站设计与实现(论文+源代码+开题报告+任务书)\ASP001中学网站设计与实现\zxweb\admin\AddNews2.asp
<!--#include file=conn.asp --> <!--#include file=session.asp--> <% BigClassID=Request.Form("BigClassID") if BigClassID=0 or BigClassID="" then %> <script language=javascript> history.back() alert("请选择新闻名称!") </script> <% Response.End end if 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 leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <p> </p> <form method="POST" action="AddNews3_submit.asp"> <table border="0" width="588" align=center> <tr> <td colspan="2" width="588"><b>增加新闻</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" align="right">新闻标题:</td> <td width="468"><input type="text" name="Title" size="56"></td> </tr> <tr> <td width="120" align="right">作者:</td> <td width="468"><input type="text" name="Author" size="56"></td> </tr> <tr> <td width="120" align="right">原出处:</td> <td width="468"><input type="text" name="Original" size="56"></td> </tr> <tr> <td valign="top" width="120" align="right">新闻内容:</td> <td width="468"><textarea name="Content" style="display:none"></textarea> <iframe ID="eWebEditor1" src="webedit/ewebeditor.asp?id=Content&style=webedit" frameborder="0" scrolling="no" width="468" HEIGHT="350"></iframe> </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>