📄 news.asp
字号:
<table width="170" border="0" cellspacing="3" cellpadding="0">
<tbody>
<%
on error resume next
sql="select * from user where kt='是' order by regdate"
rs.open sql,Conntemp,1,3
rs.pagesize=20 //设定首页显示最新加入用户条数,系统默认20
page=request("page")
if page="" then
page=1
end if
rs.absoluteposition=rs.recordcount-(page-1)*rs.pagesize
for ipag=1 to rs.pagesize
%>
<tr>
<td><IMG src="images/news_4.gif" width=9
height=9 border="0"> <a href="<%=HPDIRName%>/<%=rs(i+1)%>" target="_blank"><%=rs("sitename")%></a></td>
</tr>
<%
rs.moveprevious
if rs.bof Then exit for
next
%>
</tbody>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -