首页加入“用户排行”
作者:cmscn 日期:2005-04-11
<%
response.write ukong
'---------------------------中间2 结束----------------------------
response.write web_right
response.write web_left(0)
'---------------------------左边3 开始----------------------------
response.write vbcrlf&" <table border=0 cellspacing=0 cellpadding=0 width=185 class=bg_left height=24><tr><td class=td0> 用户积分</td></tr></table>"
sql="select top 10 id,username,bbs_counter,tim from user_data where hidden=1 order by bbs_counter desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
response.write vbcrlf&"<table border=0 cellspacing=0 class=bg_td><tr> <td align=left width=7></td><td width=155 align=left><p><img src='skin/"&joekoe_cms.web_skin&"/small/article_ontop.gif' border=0 align=absMiddle> <a href='user_view.asp?username="&rs("username")&"' alt='查看 "&rs("username")&" 的详细资料' target=_blank>"&rs("username")&"</a> </p></td><td width=13 align=right><p><font class=red>"&rs("bbs_counter")&"</font></p></td><td align=right widht=10></td></tr></table>"
rs.movenext
loop
rs.close
'---------------------------左边3 结束----------------------------
call web_center(0)
'---------------------------中间3 开始----------------------------
%>
评论: 4 | 引用: 0 | 查看次数: 690
发表评论