📄 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"> <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" -->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -