⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 news.asp

📁 闲置物品免费交易的平台
💻 ASP
字号:
<table width=100% border=0 align=center cellpadding=0 cellspacing=0>
<tr>
<td height="35" bgcolor="f1f1f1" background="../images/menu_04.gif"></td>
</tr>
<tr> 
<td height="130" valign="top">
<%
set rs_news=server.CreateObject("adodb.recordset")
strnews="select top 20 * from news where shjiaid="&id
rs_news.open strnews,conn,1,1
%>
<table width=100% border=0 align=center cellpadding=0 cellspacing=0>
<% do while not rs_news.eof %>
<tr>
<td height=23> ·
<% if len(replace(trim(rs_news("title")),"<br>",""))>10 then
	response.write "<a href=""news_shjia.asp?id="&rs_news("newsid")&""" title="&year(rs_news("addtime"))&"年"&month(rs_news("addtime"))&"月"&day(rs_news("addtime"))&"日发布>"&left(trim(rs_news("title")),8)&".."&"</a><br>"
	else
	response.write "<a href=""news_shjia.asp?id="&rs_news("newsid")&""" title="&year(rs_news("addtime"))&"年"&month(rs_news("addtime"))&"月"&day(rs_news("addtime"))&"日发布>"&trim(rs_news("title"))&"</a><br>"
	end if%>
</td>
</tr>
<%rs_news.movenext
	loop
	rs_news.close
	set rs_news=nothing%>
</table>
</td>
</tr>
</table>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -