Alıntı
<% if time > "01:00:00" then %>
<%
set rs = server.createobject("ADODB.Recordset")
rs.open "SELECT id,baslik FROM videolar ",bag,1,3
for i = 1 to 8
if Rs.eof then exit for
%>
<a href="/videolar/<%=rs("ID")%>/<%=rs("baslik")%>.html"><%=rs("baslik")%></a><br />
<%
Rs.movenext
Next
Rs.close
set Rs = nothing
%>
<% else %>
<%
for i = 1 to 8
set rs = server.createobject("ADODB.Recordset")
rs.open "SELECT id,baslik FROM videolar ",bag,1,3
Randomize
rastgele = Int((Rnd*rs.RecordCount)+0)
rs.Move(rastgele)
%>
<a href="/videolar/<%=rs("ID")%>/<%=rs("baslik")%>.html"><%=rs("baslik")%></a><br />
<%
rs.movenext : next
rs.close : set rs = nothing
%>
<% end if %>
yukardaki işlemde mantığımız;
if komutu ile şuan ki saati alıyoruz ve onu 01:00:00 yani gece yarısından 1 saat sonrayı geçmişse normal 8 taneyi göster geçmemişse geçene kadar randomize yapmasını söyledik.
Eğer ki siten çok popüler yani 24 saat giren kişi varsa 01.00.00 yerine 00:01:00 yapıp 1 dakika randomize etmesini söyleyebilirsin, fakat o 1 dakika içersinde siteye biri girmezse randomize gerçekleşmez bunuda unutmamalısın. Bu yüzden sitenin popülaritesine göre 1 saati azaltabilir veya arttırabilirsin.
NOT: Hostun yurt dışı ise; time'yi çekerken rakamlar arasında : değil . olur o yüzden onuda hostuna göre ayarlarsın....