<%Session("sayfa_seviyesi") = "0"%> <%=ana_title%> <% set lojik=server.createobject("Adodb.Recordset") sql1="select * from kategoriler order by kateid desc" lojik.open sql1,by_iBoSoFT,1,3 toplamkate=lojik.recordcount %> <% set hit=server.createobject("Adodb.Recordset") sql2="select * from download order by hit desc" hit.open sql2,by_iBoSoFT,1,3 %> <% set yeni=server.CreateObject("Adodb.Recordset") sql3="select * from download order by downid desc" yeni.open sql3,by_iBoSoFT,1,3 %> <% function toplam(kategoriid) set kategori= server.createobject("ADODB.recordset") sql4 = "select * from download where kateid=" & kategoriid & "" kategori.open sql4, by_iBoSoFT, 1, 3 toplam=kategori.recordcount end function %>
   
<% if lojik.eof or lojik.bof then %> <%else%> <% for i=1 to 15 if lojik.eof then exit for %> <% lojik.movenext next %> <%end if%>
Kayıtlı Kategori Bulunamadı
        "><%=lojik("kadi")%>    [ <% kategoriid = lojik("kateid") %><%=toplam(kategoriid)%> ]
   
<% if hit.eof or hit.bof then %> <%else%> <% for i=1 to 5 if hit.eof then exit for %> <% hit.movenext next %> <%end if%>
 Kayıt Yok
 &downid=<%=hit("downid")%>"><%=i%>) <%=Left(hit("isim"),"19") %> [<%=hit("hit")%>]
 
<% if yeni.eof or yeni.bof then %> <%else%> <% for i=1 to 5 if yeni.eof then exit for %> <% yeni.movenext next %> <%end if%>
 Kayıt Yok
 &downid=<%=yeni("downid")%>"><%=i%>) <%=Left(yeni("isim"),"22") %>