ASPden anlayan üstadların dikkatine !

    <tr>
      <td width="773" style="border-left:medium none #465673; border-bottom:medium none #465673; border-right-color: #465673; border-right-width: 1" valign="top" height="199">
      <table border="0" cellpadding="0" cellspacing="4" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber9" height="90">
        <%
on error resume next
set rsHaber = server.createobject("adodb.recordset" )
sql = "select top 5 * from Haber order by id desc"
rsHaber.open sql,bag,1,3

if rsHaber.eof or rsHaber.bof then
     response.write "<div align=center><font face=tahoma size=2>Kayıtlı haber bulunamadı</font></div>"
else     

do while not rsHaber.eof
%>
      </table>
      <table border="0" cellpadding="0" cellspacing="4" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber9" height="90">
        <tr>
          <td width="100%" colspan="2" height="36">
          <p style="margin-left: 10; margin-top:0; margin-bottom:0"><b>
          <font face="Tahoma" color="#336699" style="font-size: 9pt"> </font><font face="Tahoma" color="#465673" style="font-size: 9pt"> 
          »<span lang="tr"> </span><%=rsHaber("Baslik" )%><br>
          </font></b><font face="Tahoma" style="font-size: 8pt">
<%
Resim = rsHaber("Resim" )
if not Resim="" then
%>          
          <a href="dosya/haber/<%=rsHaber("resim" )%>" target="_blank">          
          <img border="0" src="dosya/haber/<%=rsHaber("resim" )%>" name="ana" width="150" height="112" style="border:1px solid #465673; " align="left"></a>
<%end if%>          
          </font><font face="Tahoma" color="#465673" style="font-size: 8pt"><%=rsHaber("Spot" )%></font><font face="Tahoma" color="#336699" style="font-size: 8pt">
          </font></p>
          </td>
        </tr>
        <tr>
          <td width="52%" height="16">
          <p style="margin-left: 15"><b>
          <font face="Tahoma" color="#465673" style="font-size: 8pt">Tarih: <%=rsHaber("Tarih" )%></font></b></p>
          </td>
          <td width="48%" height="16">
          <p align="right" style="margin-right: 10">
          <font face="Tahoma" color="#336699" style="font-size: 8pt"><i>
          <a style="text-decoration: none; font-weight: 700" href="Icerik.asp?S=Haber.Detay&hId=<%=rsHaber("id" )%>">
          Haberin Devamı</a></i></font></p>
          </td>
        </tr>
        <tr>
          <td width="100%" colspan="2" height="11">
                                <hr noshade color="#CCCCCC" size="1" width="95%">
          </td>
        </tr>
        <%
rsHaber.Movenext
Loop

end if

rsHaber.close
set rsHaber = nothing
%>
      </table>
      </td>
    </tr>