Blog

Veritabanından Rastgele Veri çekme (asp)

Veritabanı, kayıt ve silme işlemleri CheckBox ile toplu silme

Bugün bir script uygulamasında veritabanından rastgele veri çekmek için bu kodu ararken birçok hatalı kodla karşılaştım (veya benim işime yaramayan). Ama sonunda işe yarar bir tane buldum, bunu sizinle paylaşmak istiyorum. Bu kısa uygulama ile rastgele ürettiğimiz sayı ile veritabanından her sefer değişmek kaydıyla veri çekeceğiz.
Gerekli kodumuz

< %
Set vt = Server.CreateObject("ADODB.Connection")
vt.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veritabani.mdb")

set rs = server.createobject("ADODB.Recordset")
sql = "select * from tablo"
rs.open sql,vt,1,3

Randomize
rastgele = Int((Rnd*Rs.RecordCount)+0)
Rs.Move(rastgele)
Response.write Rs("isim")
%>

veritabani.mdb: veritabanının adını yazacağınız kısım.
sql = “select * from tablo” : tablo yazan kısıma, verinin çekilmesini istediğimiz tablonun adını yazıyoruz.
Response.write Rs(”isim”) : isim yazan kısmı tablomuzdaki stünün adını yazıcaz.

  # Yorum Yaz #

İsim :

Yorum :
(Max. 400 Karakter)

 

Kategoriler

Genel (4)
Cad - Cam (5)
3D - Grafik (5)
Kurulumlar (20)
ASP (58)
Css (2)
Sanal Eğitim (3)
Web Template (2)
Seo (9)
PHP (1)

Anket

Kullandığınız Antivirüs Programı?
Norton (%10,8)
Nod32 (%49,2)
AntiVir (%10,4)
AVG (%5,03)
Zone Alarm (%0,38)
Kaspersky (%24,0)

Toplam Oy: 258

Tüm Anketler

Takvim

« Eylül - 2017

»

PT SL ÇŞ CM CT PZ
1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30

İstatistikler

 Toplam Hit: 1395841
 Sitede Aktif: 5
 Ip: 54.156.47.142
 Browser: Default - 0.0
 Toplam Kategori: 10
 Toplam Döküman: 109
 Toplam Yorum: 16
 Toplam Resim: 607
 Toplam Mesaj: 1



   
   © 2007 - 2009 indirme.net™ All rights reserved Duman Web Hizmetleri™.