|
|
| |
|
|
Rastgele Veri |
 |
4381 Görüntülenme |
Bu kısa uygulamada ASP ile Randomize nesnemizden faydalanarak rastgele ürettiğimiz sayı ile veritabanından kayıt alacağız.Bu rastgele kayıt almak demek oluyor.
Bunun için şöyle bir kod kullanılacak :
<%
Set vt = Server.CreateObject("ADODB.Connection")
vt.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Veritabanim.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")
%>
Açıklama : Veritabanınındaki, tablo adında'ki tablodan rastgele oluşturulmuş sayı ile çarpma işlemi yapılarak bir kayıt seçilmiş oluyor.Bu uygulamanın test gösteriminde veritabanımızdaki rastgele bir script ismi alıp ekrana yazdırılıyor.
|
|
|
|
|
|
| |
|
Bu içerik hakkında 7 yorum yapılmış |
|
|
|
|
|
|
| Yorumlar(7) |
Not : Yorumlar zamana göre
son yorumdan ilk yoruma doğru(azalan) biçimde sıralanmıştır.
Yorumlarınız site yöneticileri tarafından onaylandıktan sonra eklenecektir. |
|
+ Evet anlatim gercektende guzel bir arkadasin sordugu gibi bende 1 den fazla veri cekmek istiyorum yaptigim uygulamada 2 kolon 3 satir olmak kaydiyla 6 degeri siralattim ve rasgele verilerde geliyor ama her seferinde 6 veri yerine bazen 3 bazen 6 bazen 1 gibi dengesiz bir gosterim sozkonusu
kisacasi birden fazla veriyi nasil rastgele gosterebiliriz tesekkurler |
| Yazan : Meyra | Zaman : 30 Ağustos 2007 Perşembe, Saat 01:10 |
|
|
+ Sn. Serdar Toros, Adınız Bitirme Projemde "Teşekkürler" kısmında geçecek (:
@hıfzı can
dim i
For i=1 to 9
Randomize
rastgele = Int((Rnd*Rs.RecordCount)+0)
Rs.Move(rastgele)
Response.write Rs("isim")
Next
İstediğin sorunun cevabı sanırım
bir for döngüsü kurarak halledebilirsin.. |
| Yazan : Halil | Zaman : 18 Nisan 2007 Çarşamba, Saat 18:25 |
|
|
|
|
|
|
