日期:2014-05-17 浏览次数:21230 次
<marquee scrollamount="2" height="131" width="697" onMouseOver="this.stop()" onMouseOut="this.start()">
<table> <tr>
<%
set rs=server.createobject("adodb.recordset")
sql="select top 6 * from news where picwen=1 order by id desc"
RS.open sql,conn,1,1
if RS.bof and RS.eof then
Response.Write("暂时没有图片")
else
for i=1 to 6
%>
<td>
<table border="0" width="10%" id="table1">
<tr>
<td>
<a href="show.asp?/<%= RS("id") %>.html" target="_blank" title="<%=RS("title")%>"> <img src="<%=RS("picurl")%>" border="0" width="140" height="130"> </a>
</td>
</tr>
<tr>
<td> <p align="center"><a href="show.asp?id=<%=RS("id")%>" target="_blank" title="<%=RS("title")%>"> <%=RS("title")%> </a> </td>
</tr>
</table>
</td>
<%
RS.movenext
next
set pic=nothing
RS.close
end if
%>
</tr> </table></marquee>