www.gusucode.com > CC校友录贴吧 CCBar源码程序asp编程 > template_c/page_info_list.html.asp

    <!-- #include file="page_sub_header.html.asp" -->           
<!-- ##### 主栏目开始 ##### --->
<%Call ActionView(CONST_ACTION_FUNC)%>
<table class="info_table" width="99%"  align="center" border="0" cellspacing="0" cellpadding="0">
	<tr><td>
	<%=TAG_strMenu%>	
	</td></tr>
</table>	

<table class="list_table" width="99%"  align="center" border="0" cellspacing="0" cellpadding="0">
	<% 
If IsObject(TAG_objRS) Then 
Dim i : i = 0 
Do While Not TAG_objRS.Eof %>

<tr onmouseover="BgChange(this,'odd')" onmouseout="BgChange(this,'even')" class="even">
		<td class="list_td" width="7%" style="height:23px">&nbsp;&nbsp;<img align="absmiddle" src="../images/Ico/nl.gif"></td>			
		<td class="list_td" ><a href="info_detail.asp?intArticleid=<%=TAG_objRS("ARTICLE_ID")%>&intSortId=<%=TAG_intSortId%>"><%=TAG_objRS("ARTICLE_TITLE")%></a><font color="#808080">(<%=TAG_objRS("ARTICLE_ADD_TIME")%>,浏览:<%=TAG_objRS("ARTICLE_HITS")%>次)</font></td>
	</tr>	
	<tr  width="100%">
		<td height="1" background="../images/ico/ShowBoard_line.gif"  colspan="3" ></td>
	</tr>
	
<% 
	i = i + 1 
	If i >= TAG_intPerPage Then  Exit Do 
	TAG_objRS.MoveNext
Loop
If IsObject(TAG_objRS) Then

	TAG_objRS.Close() 
	Set TAG_objRS = Nothing 
End If
End If
%>	
<input type="hidden" name="intPageNow" value="<%=TAG_intPageNow%>"  />

	<tr  width=100% class="list_title_tr"> 
		<td align="right" colspan="3"><%=TAG_strPageNav%></td>
	</tr>
</table>		    



<!-- ##### 主栏目结束 ##### -->   
<!-- #include file="page_sub_footer.html.asp" -->