?? news.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=""user/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=""user/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 + -