ASP Veritabanından Rastgele Veriler Çekmek

0
101
ASP
ASP (Active Server Pages)

Daha önce bu yazıda ASP ile veritabanından rastgele içerik çekmeyi göstermiştik. Bu yazımızda o yazımıza alternatif aşağıdaki kodlar ile isterseniz bir adet isterseniz birden fazla rastgele içerik çekmeyi gösterelim. Doğrudan kodlar üzerinde açıklayalım.

Set Rastgele = BaglantiAdi.Execute(“Select * From TabloAdi Order By Rnd(-(1000*id)*Time())“)
i=1  ‘ i değişkenimize 1 değeri verdik
While i<6 And Not Rastgele.EOF ‘ i 6 dan küçük oldukça ve içerik oldukça döngü devam edicek

‘ Veriyi bu alanda yazdırmalısınız.

i=i+1 ‘ her defasında i değişkenimizi 1 artır
Rastgele.MoveNext
Wend ‘ Döngüyü sonlandır
Rastgele.Close:Set Rastgele=Nothing ‘ Bağlantıyı sonlandır

İlk satırımızda yaptığımız bağlantıda Order By Rnd(-(1000*id)*Time()) ekledik.

Order By, bildiğiniz üzere sıralama için kullanıyordu.

Eğer birden fazla veri çekmeyecekseniz döngüye gerek yok, birden fazla değer çekmek içinde kaç adet veri çekecekseniz While i<6kısmındaki 6 değerini değiştirmelisiniz.

CEVAP VER

Lütfen yorumunuzu yazın
Lütfen adınızı ve soyadınızı yazın.