?? b_xintie.asp
字號:
<!--#include file="d_tou.asp" -->
<table width="778"" border="1" align="center" cellpadding="5" cellspacing="0" bordercolor="#FFFFFF">
<tr>
<td bordercolor="#F6F6F6" bgcolor="#FBFBFB"><img src="tupian/weizhi.gif" width="9" height="9"> <a href="b_bankuai.asp">論壇版塊</a> → 最新帖子</td>
</tr>
</table>
<table width="778"" border="1" align="center" cellpadding="5" cellspacing="1" bordercolor="#FFFFFF">
<tr bordercolor="#EBEBEB" bgcolor="#F0F0F0">
<td width="30">心情</td>
<td><div align="center">標題</div></td>
<td width="100"><div align="center">所屬板塊</div></td>
<td width="30"><div align="center">回復</div></td>
<td width="40"><div align="center">瀏覽</div></td>
<td width="100"><div align="center">作者</div></td>
</tr>
</table>
<%
set zuixinshu=lj.execute("select zuixinshu from luntan")
set zuixin=lj.execute("select top "& zuixinshu("zuixinshu") &" xuhao,biaoti,xinqing,mingzi,bankuai,liulan from tiezi where tiezi='tiezi' order by shijian desc")
if zuixin.bof and zuixin.eof then
%>
<table width="778"" border="1" align="center" cellpadding="20" cellspacing="0" bordercolor="#FFFFFF"><tr>
<td bordercolor="#D6D6D6" bgcolor="#EBEBEB"> <div align="center">還沒有帖子</div></td></tr></table>
<%
else
do while not zuixin.eof
%>
<table width="778"" border="1" align="center" cellpadding="5" cellspacing="1" bordercolor="#FFFFFF">
<tr bordercolor="#F0F0F0" bgcolor="#F5F5F5"><td width="30"><div align="center"><img src="xinqing/<%=zuixin("xinqing")%>.gif"></div></td>
<td bordercolor="#F5F5F5" bgcolor="#FAFAFA"><a href="b_kantie.asp?tiezi=<%=zuixin("xuhao")%>"><%=server.HTMLEncode(zuixin("biaoti"))%></a> </td>
<td width="100" bordercolor="#F5F5F5" bgcolor="#FAFAFA"> <div align="center"><a href="b_luntan.asp?bankuai=<%=zuixin("bankuai")%>">
<%
set shubankuai=lj.execute("select mingzi from bankuai where xuhao="& zuixin("bankuai") &"")
response.Write(shubankuai("mingzi"))
%>
</a></div></td><td width="30" bordercolor="#F5F5F5" bgcolor="#FAFAFA"><div align="center">
<%
shuyu=zuixin("xuhao")
set huifu=lj.execute("select count(*) as huifu from tiezi where tiezi='"& shuyu &"'")
response.Write(huifu("huifu"))
%>
</div></td><td width="40" bordercolor="#F5F5F5" bgcolor="#FAFAFA"><div align="center">
<%
response.Write(zuixin("liulan"))
%>
</div></td><td width="100" bordercolor="#F5F5F5" bgcolor="#FAFAFA"><div align="center">
<a href="b_kanren.asp?mingzi=<%=zuixin("mingzi")%>" target="_blank">
<%=server.HTMLEncode(zuixin("mingzi"))%></a> </div></td></tr></table>
<%
zuixin.movenext
loop
end if
%>
<!--#include file="d_wei.asp" -->
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -