www.gusucode.com > 学校共青团组织网站源代码 > 学校共青团组织网站源代码/626/admin/admin_news_lm2.asp
<!--#include file = admin_chk.asp --> <!--#include file = admin_conn.asp --> <html> <head> <!--#include file = language.asp --> <title>增加新闻栏目</title> <style> <!-- a:link { font-size: 9pt; font-family: 宋体; color: #000000;text-decoration: none; } a:visited { color: #000000; font-family: 宋体; font-size: 9pt;text-decoration: none; } a:hover { font-size: 9pt; font-family: 宋体; color: #000000;TEXT-DECORATION: underline; } body { font-family: 宋体; color: #000000; font-size: 9pt } p { color: #000000; font-family: 宋体; font-size: 9pt } td { font-size: 9pt; font-family: 宋体; color: #000000 } input { font-size: 9pt; font-family: 宋体; color: #000000 } --> </style> </head> <body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" marginwidth="0" marginheight="0" bgcolor="#EFEFDE"> <table border="0" width="100%" id="table1" height="80"> <tr> <td> </td> </tr> <tr> <td> <p align="center"> <a href=admin_news_lm.asp><span style="font-size: 10.5pt">返回一级栏目</span></a></td> </tr> <tr> <td> <!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript" Type="text/javascript"><!-- function FrontPage_Form1_Validator(theForm) { if (theForm.lm2.value == "") { alert("请在 子栏目 域中输入值。"); theForm.lm2.focus(); return (false); } if (theForm.lm2.value.length < 1) { alert("在 子栏目 域中,请至少输入 1 个字符。"); theForm.lm2.focus(); return (false); } if (theForm.lm2.value.length > 10) { alert("在 子栏目 域中,请最多输入 10 个字符。"); theForm.lm2.focus(); return (false); } return (true); } //--></script><!--webbot BOT="GeneratedScript" endspan --><form method="POST" action="admin_news_lm2_add_save.asp?id=<%=trim(request("id"))%>&lm=<%=trim(request("lm"))%>" name="FrontPage_Form1" onsubmit="return FrontPage_Form1_Validator(this)" language="JavaScript"> <p align="center"> <!--webbot bot="Validation" s-display-name="子栏目" b-value-required="TRUE" i-minimum-length="1" i-maximum-length="10" --><input type="text" name="lm2" size="20" maxlength="10"> <input type="submit" value="在“<%=trim(request("lm"))%>”增加子栏目" name="B1"></p> </form> </td> </tr> </table> <div align="center"> <table border="1" width="600" id="table2" cellpadding="4" style="border-collapse: collapse" cellspacing="0" bordercolor="#999999"> <tr> <td align="center" width="341" bgcolor="#CCCCCC" background="../images/topBar_bg.gif"><b>“<%=trim(request("lm"))%>”的子栏目</b></td> <td align="center" width="108" bgcolor="#CCCCCC" background="../images/topBar_bg.gif"><b>新闻数量</b></td> <td align="center" width="114" bgcolor="#CCCCCC" background="../images/topBar_bg.gif"> <b>操作</b></td> </tr> <% id=trim(request("id")) lll="<img src=../images/001.gif border=0 height=20 width=17>" sql = "select * from lm where lmid='"&id&"' order by id asc" Set rs = Server.CreateObject("ADODB.RecordSet") rs.Open sql,conn,1,1 if rs.recordcount<>0 then for i=0 to rs.recordcount %> <tr> <td width="341" height="29"> <% response.write "<font color=999999>(编号:"&rs("id")&")</font> <a href=admin_news_list.asp?lm="&rs("id")&">"&rs("lm2")&"</a>" %></td> <td width="108" height="29"> <p align="center"><% sqll="select lm,id from news where lm2='"&rs("id")&"'" Set rss = Server.CreateObject("ADODB.RecordSet") rss.Open sqll,conn,1,1 xwsl=rss.recordcount response.write xwsl rss.close set rss=nothing %></td> <td width="114" height="29"> <p align="center"> <a href="admin_lm2_edit.asp?id=<%=rs("id")%>&xwsl=<%=xwsl%>&lm1id=<%=trim(request("id"))%>&lmname=<%=trim(request("lm"))%>">修改</a> <a onclick='{if(confirm("您确定删除吗?此操作将不能恢复!")){return true;}return false;}' href="admin_lm_del2.asp?ID=<%=rs("ID")%>&lm=<%=trim(request("lm"))%>&lmid=<%=trim(request("id"))%>">删除</a></td> </tr> <% rs.movenext if rs.eof then exit for next end if %> </table> </div> </body> </html> <% rs.close set rs=nothing conn.close set conn=nothing %>