<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="<%=blok_aplan%>" class="tablo_cevre">
  <tr>
    <td><table width="100%%" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="35"><img src="Temalar/<%=session("tema")%>/blok_bas.gif" width="35" height="24"></td>
    <td background="Temalar/<%=session("tema")%>/blok_devam.gif" class="tablo_baslik"><b>»TuRaN WeB PoRtAL-Videolar</b></td>
        </tr>
      </table>
      <table width="99%" border="0" align="center" cellpadding="0" cellspacing="5">
      <tr>
      <td height="10" background="Resimler/KayanResimFilim.JPG">&nbsp;</td>
    </tr>
    <tr>
      <td>
<MARQUEE  DIRECTION="left" onmouseover="this.scrollAmount='0';" onmouseout="this.scrollAmount='2';" scrollAmount="2" SCROLLDELAY="50">
<table><tr>
<%
Set reskay = Connect.Execute("select * from video where onay=0 order by id DESC")

For im = 1 To 20
if reskay.eof Then exit For
%>

<td><font class="blok_font"><object><param name="wmode" value="transparent"></param><embed src="<%=reskay("b_resim")%>" type="application/x-shockwave-flash" wmode="transparent" width="90" height="75"></embed></object><center><a href="Moduller/Video/Goster.asp?id=<%=reskay("id")%>" target="_blank"><%=reskay("isim")%><br><b>( İZLE )</b></a></center></font></td>

<%
reskay.Movenext
Next
reskay.Close
Set reskay = Nothing
%>
</table></tr></marquee>
 </td></tr>
    <tr>
      <td height="6" background="Resimler/KayanResimFilim.JPG">&nbsp;</td>
    </tr>
   
</table></td>
   
    </tr>
</table><br>