2jleft.asp

网站 QCNEWS后台管理程序,风格流行功能强大

<table width=95% cellspacing=0 cellpadding=0>
	<tr>
	<td class="lframe-t-left"></td>
	<td class="lframe-t-mid">
		<span class="lframe-t-text">分类</span>
	</td>
	<td class="lframe-t-right"></td>
	</tr>
	</table>
	<table width=95% cellspacing=0 cellpadding=0>
	<tr>
	<td class="lframe-m-left"></td>
	      <td valign="top" class="lframe-m-mid"> <img align=absmiddle src='image/folderClose.gif'><a href=index.asp>首页</a><br>
		  <%
		  
		  Sql = "Select Unid,Classname from article_class where flag = 0 order by orderflag asc"
		  Set Rs = conn.execute(Sql)
		  if not(Rs.eof and rs.bof) then
			do while not rs.eof
				if Cstr(Rs(0)) = Cstr(id) then
					Response.write("<img align=absmiddle src='image/folderOpen.gif'>")
					Response.write("<a href=2j.asp?id="& Rs(0) &">" & Rs(1) & "</a>")
					Response.write(" <font face=Arial style='font-size:8pt' class=gray>("& Rs(0) &")</font><br>")
					Sqls = "Select Unid,Classname from article_class where flag = "& id &" order by orderflag asc"
					Set Rss = conn.execute(Sqls)
					if not (Rss.eof and Rss.bof) then
						do while not Rss.eof
							Response.write("<font class=gray>├</font><img align=absmiddle src='image/folderClose.gif'>")
							Response.write("<a href=2j.asp?id="& Rs(0) &"&cid="& Rss(0) &">" & Rss(1) & "</a>")
							Response.write("<font face=Arial style='font-size:8pt' class=gray>("& Rss(0) &")</font><br>")
						Rss.movenext
						loop
					end if
					Rss.close
				else
					Response.write("<img align=absmiddle src='image/folderClose.gif'>")
					Response.write("<a href=2j.asp?id="& Rs(0) &">" & RS(1) & "</a>")
					Response.write(" <font face=Arial style='font-size:8pt' class=gray>("& Rs(0) &")</font><br>")
				end if
			rs.movenext
			loop
		  end if
		  rs.close
		  %>
            
            <br>
	</td>
	<td class="lframe-m-right"></td>
	</tr>
	</table>
	<table width=95% cellspacing=0 cellpadding=0 >
	<tr>
	<td class="lframe-b-left"></td>
	<td class="lframe-b-mid">&nbsp;</td>
	<td class="lframe-b-right"></td>
	</tr>
	</table>
	
	<table width=95% cellspacing=0 cellpadding=0>
	<tr>
	<td class="lframe-t-left"></td>
	<td class="lframe-t-mid">
		<span class="lframe-t-text">热门文章</span>
	</td>
	<td class="lframe-t-right"></td>
	</tr>
	</table>
	<table width=95% cellspacing=0 cellpadding=0>
	<tr>
	<td class="lframe-m-left"></td>
	      <td valign="top" class="lframe-m-mid">
		  <%Call Qcdn.Toplist("10","hits",0)%>
		  </td>
	<td class="lframe-m-right"></td>
	</tr>
	</table>
	<table width=95% cellspacing=0 cellpadding=0 >
	<tr>
	<td class="lframe-b-left"></td>
	<td class="lframe-b-mid">&nbsp;</td>
	<td class="lframe-b-right"></td>
	</tr>
	</table>