Kako da gi koristam EOF i BOF. Deko

[ DekoRoker @ 05.03.2008. 19:50 ] @

Luge imam problem. Problemot e sto ne znam kako da najdam zapis od baza na podatoci. Ako mozete da mi dadete source code za ova togas odlicno. Ako ne barem objasnete kako da gi koristam EOF(end of file) i BOF(begin of file). VE MOLAM POMOGNETE ITNO E. FALA

[ Aleksandar Vasic @ 05.03.2008. 21:20 ] @

Primer iz koda za pretrazivanje baze povezane preko ADO

Code:
Adodc1.Recordset.MoveFirst
If Text1.Text <> Adodc1.Recordset(0) Then
Do
If Adodc1.Recordset.EOF Then
MsgBox "Nema podatka u bazi"
Exit Sub
End If
Adodc1.Recordset.MoveNext
Loop Until Text1.Text = Adodc1.Recordset(0)

EOF = End Of File
BOF = Begining of File

Znaci ova linija If Adodc1.Recordset.EOF Then UradiNesto
ako stigne do kraja baze da izvrsi zadate komande....

[ galahad @ 05.03.2008. 21:31 ] @

Prvo, ne reche koju verziju VB koristish, da li VB6 ili VB.NET

Evo primera kako bi to koristio iz VB6, sa korishtjenjem DAO objekata

Code:

Dim DB As Database
Dim RS As Recordset

Set DB = OpenDatabase("nekabaza.mdb")
Set RS = DB.OpenRecordset("neka_tabela")

RS.MoveFirst
While Not RS.EOF
  ' Ovde radish neshto
  RS.MoveNext
Wend

While Not RS.BOF
  ' Ovde radish neshto drugo
  RS.MovePrevious
Wend

U sushtini EOF je uvek False, sve dok ne dodjesh do poslednjeg sloga u bazi... Slichno je za BOF, s jedinom razlikom shto je False sve dok ne dodjesh do prvog sloga u bazi... To je u sushtini to, nadam se da smo pomogli malo...

[ Eurora3D Team @ 05.03.2008. 23:35 ] @

ADODB.Recordset ima i RecordCount Prop. (broj pronadjenih redova u tabeli posle SQL upita)

[ Aleksandar Ružičić @ 06.03.2008. 02:51 ] @

koji ume da zada problema :) pa je preporucljivije u te svrhe koristiti COUNT(*)

[ Eurora3D Team @ 06.03.2008. 13:57 ] @

To mora da je neki neotkriveni MS bug

_{ovo je sala}

_{[Ovu poruku je menjao Eurora3D Team dana 06.03.2008. u 21:16 GMT+1]}