NCMag.asp 3.6 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667
  1. <%Session.CodePage=65001%>
  2. <html>
  3. <head>
  4. <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
  5. <title>BdeCMS网站后台管理登陆</title>
  6. <link rel="stylesheet" type="text/css" href="../bdcommx/css.css">
  7. </head>
  8. <!--#include file="../bdcommx/connxyz.asp"-->
  9. <!--#include file="../bdcommx/jsall.asp"-->
  10. <%call log_chk()%>
  11. <body>
  12. <table width="100%" height="42" border="0" cellpadding="0" cellspacing="0">
  13. <tr>
  14. <td width="4%" height="42" align="center" background="../images/top_bg2.jpg"><img src="../images/dian.gif" width="10" height="10" /></td>
  15. <td width="96%" background="../images/top_bg2.jpg" class="hui12">后台管理:&gt;&gt; 信息类别管理</td>
  16. </tr>
  17. </table>
  18. <table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" class="tab_bdr">
  19. <tr>
  20. <td colspan="5" align="center" background="../images/bg2.jpg" bgcolor="#000000" class="tb_bg"><strong>类别管理<font color="#FF0000">(<a href="NCBadd.asp"><font color="#FF0000">添加一级分类</font></a>)</font></strong></td>
  21. </tr>
  22. <tr>
  23. <td width="39%" align="center" class="tb_bg"><strong>类别列表</strong></td>
  24. <td width="12%" align="center" class="tb_bg"><strong>查看信息</strong></td>
  25. <td width="15%" align="center" class="tb_bg"><strong>添加时间</strong></td>
  26. <td width="9%" align="center" class="tb_bg"><strong>分类排序</strong></td>
  27. <td width="25%" align="center" class="tb_bg"><strong>操作</strong></td>
  28. </tr>
  29. <%Set rsbig=Server.Createobject("Adodb.Recordset")
  30. sql="select * from nbclass order by nb_order asc"
  31. rsbig.open sql,conn,1,3
  32. if rsbig.eof then response.Write("")
  33. do while not rsbig.eof%>
  34. <tr>
  35. <td height="26" class="NcB_bg"> <img src="../images/jia.gif" width="16" height="16" align="absmiddle" /> <%=rsbig("nb_name")%> <%if rsbig("Fileurl")<>"" then%>[<span class="Fnt_red">图</span>]<%end if%></td>
  36. <td align="center" class="NcB_bg"><a href="Nmag.asp?Bid=<%=rsbig("nb_id")%>">[查看]</a></td>
  37. <td align="center" class="NcB_bg"><%=formatdatetime(rsbig("nb_wtime"),2)%></td>
  38. <td align="center" class="hong14"><%=rsbig("nb_order")%></td>
  39. <td align="center" class="NcB_bg"><a href="NCSadd.asp?Bid=<%=rsbig("nb_id")%>"><font color="#0000FF">[添加分类]</font></a> <a href="NCBmod.asp?theX=<%=rsbig("nb_id")%>">[修改]</a> <a href="NCBdel.asp?theX=<%=rsbig("nb_id")%>" onClick="return Delbig();">[删除]</a></td>
  40. </tr>
  41. <%Set rssmall=Server.Createobject("Adodb.Recordset")
  42. sql="select * from nsclass where nb_id="&rsbig("nb_id")&" order by ns_order asc"
  43. rssmall.open sql,conn,1,3
  44. if rssmall.eof then response.Write("")
  45. do while not rssmall.eof%>
  46. <tr>
  47. <td height="26">   <img src="../images/jian.gif" width="16" height="16" align="absmiddle" /> <%=rssmall("ns_name")%> <%if rssmall("Fileurl")<>"" then%>[<span class="Fnt_red">图</span>]<%end if%></td>
  48. <td height="26" align="center"><a href="Nmag.asp?Bid=<%=rssmall("nb_id")%>&Sid=<%=rssmall("ns_id")%>">[查看]</a></td>
  49. <td height="26" align="center"><%=formatdatetime(rssmall("ns_wtime"),2)%></td>
  50. <td height="26" align="center" class="lv14"><%=rssmall("ns_order")%></td>
  51. <td height="26" align="center">    &nbsp;  <a href="NCSmod.asp?theX=<%=rssmall("ns_id")%>">[修改]</a> <a href="NCSdel.asp?theX=<%=rssmall("ns_id")%>" onClick="return DelSmall();">[删除]</a></td>
  52. </tr>
  53. <%rssmall.movenext
  54. loop
  55. rssmall.close
  56. set rssmall=nothing
  57. %>
  58. <%rsbig.movenext
  59. loop
  60. rsbig.close
  61. set rsbig=nothing
  62. %>
  63. </table>
  64. <br />
  65. </body>
  66. </html>