Hergün değişen random video

22-10-2008, 03:47:19

Arkadaşlar bir video sitem var.

Ana sayfada database den random olarak 8 video sıralıyorum. Her sayfa yenilendiginde degisiyor. Fakat ben istiyorum ki bu her yenilemede değil günde 1 kez ve sadece gece 12 de değişsin. Nasıl yapabilirim acaba yardımcı olabilecek olan var mı ?

Ben şöyle bir kod kullanıyorum

Rastgele İçerik
                
                <%
                set rs = server.createobject("ADODB.Recordset")
                rs.open "SELECT ID,BASLIK FROM VIDEOLAR WHERE ANA<>0",baglan,1,3
                randomize
                rs.move int((rnd*(rs.recordcount-5)))
                for t=1 to 8
                if rs.eof then exit for
                %>
               <a href="/videolar/<%=rs("ID")%>/<%=degistir(rs("BASLIK"))%>.html"><%=rs("BASLIK")%></a>
               
                <%
                rs.movenext : next
                rs.close : set rs = nothing
                %>

Bunun günde sadece bir kez değişmesini istiyorum. Şimdiden teşekkürler yardımcı olacak arkadaşlara

22-10-2008, 15:04:58

#2

svamder

tarih formatına bağlayıp ordan değiştirmesini sağlayabilirsin

22-10-2008, 15:34:18

#3

scrol

Peki ama nasıl

daha cok acemiyim asp konusunda.

22-10-2008, 23:29:51

#4

scrol

Yok mu yardımcı olacak hayırsever bi aspcoder

23-10-2008, 23:38:42

#5

~~Tuncsoft~~

Üyeliği durduruldu

<%
GununTarihi = Date()

Set Rs = Server.CreateObject("Adodb.Recordset")
	SQLs = ("SELECT * FROM tbl_videolar WHERE GosterimTarihi='" & GununTarihi & "';")
Rs.Open (SQLs)
%>

Video tablosunda GosterimTarihi olarak bir sütun açarsın , videoları eklerken hagi tarihte gösterilmesini istiyorsan girersin, o tarih geldiğinde Günün videosu görünür.

Anladınız umarım

24-10-2008, 02:50:40

#6

scrol

Tuncsoft adlı üyeden alıntı: mesajı görüntüle

<%
GununTarihi = Date()

Set Rs = Server.CreateObject("Adodb.Recordset")
    SQLs = ("SELECT * FROM tbl_videolar WHERE GosterimTarihi='" & GununTarihi & "';")
Rs.Open (SQLs)
%>

Video tablosunda GosterimTarihi olarak bir sütun açarsın , videoları eklerken hagi tarihte gösterilmesini istiyorsan girersin, o tarih geldiğinde Günün videosu görünür.

Anladınız umarım

Tam tamına böyle birşeydi aradığım. Mantığını kavradım çok teşekkür ederim

24-10-2008, 03:38:45

#7

apridev

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....