
simdiden cok tesekkur ederim site ismini veriyorum ne demek istedigimi anlarsiniz
https://www.mutlushairandbeauty.com/
buda kodlar
Set orta = Server.CreateObject("ADODB.Recordset")
Sorgu = "Select * from orta WHERE ONAY=5 order by id rand"
orta.open sql,baglan,1,4
Randomize
rastgele = Int((Rnd*orta.RecordCount)+0)
orta.Move(rastgele)
If orta.eof then
%>
<li class="odd"></li>
<%
Else
for yo = 1 to 6
if orta.eof then exit for