<%
son_SQL = "SELECT * FROM oyunlar ORDER BY RND"
oyun.open son_SQL,db,1,3
%>
<% i = 0 %>
<% y = 0 %>
<% for y = 1 to 10
if oyun.eof then exit for %>
..................................
<% oyun.movenext %>
<% i = i + 1 %>
<% if i = 5 then
i = 0
%>
</tr><tr>
<% end if %>
<% next %>
<% oyun.close %>
bu kod oyunların ilk sütunda 5 ve ikinci sütunda 5 tane oyun görüntülüyor.ben bunu tek oyun için kullanmak istiyorum.yani sayfayı her yenilediğimizde rasgele , bir tane oyun görüntülensin.yardımlarınızı bekliyorum.
görüntüleme hakkında
3
●463
- 08-03-2009, 13:40:59<%
Set oyun= Server.CreateObject("ADODB.Recordset")
oyun.Open "SELECT * FROM oyunlar ORDER BY RND",Sur,1,3
If not oyun.eof then
Do
Randomize
rastgele = Int((Rnd*oyun.recordcount)+0)
oyun.Move(rastgele)
Loop While IsNull(oyun("rnd"))
%>
bununla bi kayıtsetinden belirlediğin sql sorgusu için rastgele veri çekebilirsin.
