<%
sor = "select * from reklamtablosu "
cnet.Open sor,Sur,1,3
if cnet.eof or cnet.bof then ' Kayıt kontrolü yapıyoruz
'kayıt yok ise burada alan boş çıkar buraya reklam alanı vs gibi bir image eklenebilir
else
toplam = cnet.RecordCount 'Kayıt var ise burada randomize kodumuz başlıyor
Randomize
id = Int((toplam * Rnd ) +0)
cnet.Move(id)
%>
">
<%end if
cnet.close%>
Bağlantı kodlarınızı ve veritabanı yapınızı bilmediğimden böyle basit bir örnek kod hazırladım. Sanırım bu istediğiniz tüm alanlarda gerekli yerleri değiştirerek işinizi görecektir.
Test edilmiştir...
Bu arada cnet bizim değişkenimizdir yani ÇağdaşNeT in kısaltması gibi. Bu kısmı siz kendi yapınıza göre değiştireceksiniz.
Ek Olarak: Durum ne dir !