/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
MDI
Fra : Kim Roth


Dato : 29-10-01 14:15

Hej Steffen

Det er stadig det samme, den går i stå ved

Set rst = db.OpenRecordset("tabel")

Jeg kan som sagt godt få det til at virke, hvis jeg tester det på en ny
form.

Hilsen Kim Roth

Steffen Beck <srd@srd.dk> skrev i en
nyhedsmeddelelse:dM8D7.40$5N3.1130@news.get2net.dk...
> Vil du vise din messagebox det antal gange der er poster i recordsettet ?
> RecordCount er ikke opdateret før alle posterne i recordsættet er åbnet,
> dvs. du skal prøve noget ala :
>
> Public Function antal()
> Dim i As Integer
> Dim db As Database
> Dim rst As Recordset
> Set db = OpenDatabase("c:\database.mdb")
> Set rst = db.OpenRecordset("tabel")
> If rst.RecordCount > 0 Then rst.MoveLast
>
> På dette tidspunkt vil rst.RecordCount angive det faktiske antal ikke
> slettede poster i recordsættet, også hvis der ikke er poster, men man skal
> være opmærksom på at det går lidt ud over ydeevnen
>
> For i = 1 To rst.RecordCount
> MsgBox rst.RecordCount & " antal poster i databasen"
> Next
> End Function
>
> MVH
>
> Stef
>
> >
> "Kim Roth" <kim-roth@privat.dk> wrote in message
> news:3bdc897f$0$728$edfadb0f@dspool01.news.tele.dk...
> > Hej NG
> >
> > Er der en som kan forklare, hvorfor denne sætning ikke virker, når jeg
> > bruger den i en MDI form, men hvis jeg tester den på en alm. form1, er
der
> > ingen problemer. Jeg bruger en Data1 kontrol på begge mine forme??
> >
> > Public Function antal()
> > Dim i As Integer
> > Dim db As Database
> > Dim rst As Recordset
> > Set db = OpenDatabase("c:\database.mdb")
> > Set rst = db.OpenRecordset("tabel")
> > For i = 1 To rst.RecordCount
> > MsgBox rst.RecordCount & " antal poster i databasen"
> > Next
> > End Function
> >
> > Hilsen Kim Roth
> >
> >
>
>







 
 
Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408928
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste