Yeni Kayıt
Konudaki Resimler
|
Hızlı 
Bildirim
RecordCount Sorunu (VB)
Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla 
Bu Konudaki Kullanıcılar:
Daha Az 
2 Misafir - 2 Masaüstü
Giriş
Mesaj
-
-
orada ki sorun
bi dataset olmasına ragmen bır sefer bır tek kayda erısmen once
while not(data1.recordset.eof)
i=i+1
}
seklinde kayıt sayısını alman lasımdır
o sekılde alıp yapman lasım
-
quote:
Orjinalden alıntı: Sesostris
orada ki sorun
bi dataset olmasına ragmen bır sefer bır tek kayda erısmen once
while not(data1.recordset.eof)
i=i+1
}
seklinde kayıt sayısını alman lasımdır
o sekılde alıp yapman lasım
Dediğin şekilde yaptım.. İstediğim sonuca ulaştım.. Teşekkürler
Kod şu şekilde..
Private Sub Command1_Click()
i = 0
While Not (Data1.Recordset.EOF)
i = i + 1
Data1.Recordset.MoveNext
Wend
RastgeleSayi = CInt(Rnd * i) + 1
Text1.Text = RastgeleSayi
End Sub
Sayfa:
1
Ip işlemleri
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
