 |
|
|
|
|
 |
|
|
|
|
 |
|
| 电话： | 021-52988986/52988987
转8000分机 |
 |
| 手机： | 13671655526（24小时） |
|
| Email： | echangyu@126.com |
|
| MSN： | toys4ush@hotmail.com |
|
| QQ： | 11898926 |
|
|
|
|
|
|
<%dim i
i=0
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 5 newsname,adddate,newsid from shop_news order by adddate desc",conn,1,1
if rs.eof and rs.bof then
response.write "目前还没有新闻！"
else
do while not rs.eof
i=i+1
response.write " "&trim(rs("newsname"))&"
"
if i>=5 then exit do
rs.movenext
loop
end if
rs.close
set rs=nothing%><%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 10 bookid,bookname from shop_books order by liulancount desc",conn,1,1%> |
|