<table width="980" border="0" cellspacing="0" cellpadding="0">
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from yqlj order by id desc"
rs.open sql,connstr,1,1
if rs.eof and rs.bof then
response.Write "<tr><td align='center' height='40'>暂无内容</td></tr>"
else
for i=1 to rs.recordcount
%>
<tr>
<td align="left" valign="middle">
<table width="960" border="0" cellspacing="0" cellpadding="0">
<tr><% for j=1 to 4 %>
<td width="120" height="44" align="center" valign="middle"><a href="<%=rs("url")%>" target="_blank"><img src="<%=rs("pic")%>" width="88" height="31" border="0" alt="<%=rs("dw")%>" /></a></td>
<%
rs.movenext
if rs.eof then exit for
next
%>
</tr>
</table></td>
</tr>
<%
if rs.eof then exit for
next
end if
rs.close
%>
</table>