Asp Rastgele Değer Üretmek!

Bu Dersimizde asp ile veritabanından rastgele Değer Oluşturmayı öğreneceğiz!

Evet arkadaşlar bu dersimizde veritbanındaki verilerden rastgele veri üretmeyi öğreneceğiz.
Gerekli dosyalarımız
db.mdb adlı veri acces dosyası
altkategori adlı tablomuz
ve ad adlı fieldimiz değeri not olsun!
Tabi sürekli değer üreteceği için ad adlı fieldimizde 10-15 tane kayit yazın bunların arasından bilgisayarımız rastgele değer sunacak bizlere dilerseniz kodlamamıza geçelim!
default.asp


<%

Set bag=Server.CreateObject("Adodb.Connection")

bag.Open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.MapPath("db.mdb")



set rs = server.createobject("ADODB.Recordset")

sql = "select * from altkategori"

rs.open sql,bag,1,3

Randomize

rastgele = Int((Rnd*rs.RecordCount)+1)

rs.Move(rastgele) 



Response.Write(rs("ad"))

%>


Evet arkadaşlar veritabanı bağlantımızı yaptık random komutu ile rastgele değer oluşturmayı sağladık.+1 olarak sürekli artmasını istedik çalıştırdığımız zaman göreceksiniz.
Herkese İyi Çalışmalar...
  • Etiketler;
Yorum Yaz

Yorum yazabilmek için üye girişi yapmanız gerekiyor!

Yukarı Git