由于没有认真看你的代码,所以我的第一次回复是错的,应该是:
<
%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select top 5 * from myword order by time desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "暂时没有留言"
else
response.write "<span style=font-size:9pt;color:red>"
response.write "<marquee direction=up scrollamount=2 height=180>"
do while not rs.eof or rs.bof
name=rs("name")
pic=rs("pic")
top=rs("top")
word=rs("word")
ip=rs("ip")
response.write "来自 "&ip&" 的"
response.write " "&name&" 于 "&time&" 说道"
response.write " "&word&" "
rs.movenext
loop
response.write "</marquee>"
response.write "</span>"
end if
rs.close
set rs=nothing
%>
[此贴子已经被作者于2005-7-11 22:42:48编辑过]
2005-07-10 14:16
