homek.asp

媒体中国-设计联盟

<!--#include file="dbinc/dbpath.asp" -->
<% set rs=createobject("adodb.recordset")    
rs.open "select top 9 pickid,picksite,pickvisitor from zkpick order by pickid desc",conn       
do while not rs.eof    
response.write "document.write('<li><a href=""../pick/show.asp?id="&rs("pickid")&"""  target=_blank>"&rs("picksite")&"</a>  <font color=#333333>"&rs("pickvisitor")&"℃</font>');"       
response.write"document.write('<br>');"   
rs.movenext 
loop
rs.close       
set rs=nothing %>