tesekkur ederim ama hic bir sey degismedi su sizin verdiginiz gibi calisiyor yani ayni
bu sekilde yaptim tuhaf tarafi yine ayni calisiyor degisen hic bir sey yok fakat hata dahi vermiyor ?
Set orta = Server.CreateObject("ADODB.Recordset")
Sorgu = "SELECT * FROM kategoriler WHERE orta order by id=5() limit 6"
orta.open sql,baglan,1,4
Randomize
rastgele = Int((Rnd*orta.RecordCount)+0)
orta.Move(rastgele)
If orta.eof then
birde anlatamadim galiba ben kategorinin icinden bir id numarasinin icinden rasgele 6 tane cekmek istiyorum sizin demek istediginiz gibi zaten site su anda