showadv.asp

新世纪影院源码

  <table border="0" cellpadding="0" cellspacing="0" width="770" bgcolor="#FF9900">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from adv where yesorno='yes' order by id desc"
rs.open sql,conn,1,1
if rs.eof or bof then
response.write""
else
do while not rs.eof or bof
%>
  <tr>
    <td height="66"><a href=<%=rs("advurl")%> target=_blank><img border="0" src=<%=rs("advpic")%> title=<%=rs("advname")%> width="770" height="66"></a></td>
  </tr>
<%
rs.movenext
loop
end if
rs.close
%>
</table>