www.gusucode.com > 随缘网络产品管理系统 2.0码程序 > about.asp
<!--#include file="SysProduct.asp"--> <% id=request.querystring("id") if ID="" then response.Redirect("index.asp") end if sql="select * from about where ID=" & ID & "" Set rs1= Server.CreateObject("ADODB.Recordset") rs1.open sql,conn,1,1 if rs1.bof and rs1.eof then response.write"<SCRIPT language=JavaScript>alert('找不到此栏目!');" response.write"javascript:history.go(-1)</SCRIPT>" else %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title><%=rs1("title")%>-随缘网络产品管理系统2.0</title> <link rel="stylesheet" type="text/css" href="115cn.css"> </head> <body> <!--网站顶部开始 --> <!--#include file="head.asp"--> <div class="main"> <!--网站左边开始 --> <div class="left"> <div class="bt">产品类别</div> <div class="flnr"> <div id="PARENT"> <ul id="nav"> <% sql="select * from bigclass" set rsddz=conn.execute(sql) ii=0 do while not rsddz.eof ii=ii+1 %> <li><a onMouseOver="DoMenu('ChildMenu<%=ii%>')" href="sort.asp?bigclassname=<%=rsddz("BigClassName")%>" ><%=rsddz("BigClassName")%></a> <ul id="ChildMenu<%=ii%>" class="collapsed"> <% sql="select * from smallclass where BigClassName='"&rsddz("BigClassName")&"'" set rsxdq=conn.execute(sql) do while not rsxdq.eof %> <li><a href="sort.asp?bigclassname=<%=rsddz("BigClassName")%>&smallclassname=<%=rsxdq("SmallClassName")%>" ><%=rsxdq("SmallClassName")%></a></li> <% rsxdq.movenext loop rsxdq.close set rsxdq=nothing %> </ul> </li> <% rsddz.movenext loop rsddz.close set rsddz=nothing %> </ul> </div> <script language="javascript" type="text/javascript" src="../menu.js"></script> </div> </div> <!--网站左边结束 --> <!--网站右边开始 --> <div class="cp"> <div class="bt"><%=rs1("title")%></div> <div class="cpnr2"><%=rs1("content")%></div> </div> <!--#include file="bottom.html"--> </div> <% rs1.close set rs1=nothing end if conn.close set conn=nothing%> </body> </html>