"Klaus" <ambrass@vip.cybercity.dk> wrote in message
news:Xns91777601B2CD2Ambrass@193.88.15.201...
> Hej alle,
>
> hvis jeg i Access har fx. følgende query:
>
> qryFindHansen:
>
> SELECT * FROM tabel WHERE felt="Hansen";
>
> Så kan jeg nemt se i queryvinduet at der er fx. 25 poster. Men
> hvordan kan jeg fra VBA finde ud af hvor mange poster der
> returneres efter jeg har kørt "qryFindHansen"?
>
> /Klaus
Hej Klaus
Du kan gøre noget ala nedenstående:
Public Sub numberOfPosts()
Dim rs As Recordset
' Åbner forespørgslen qryRandom
Set rs = CurrentDb.OpenRecordset("qryRandom")
' Hvis der ikke findes nogen poster, så stop
If rs.BOF And rs.EOF Then Exit Sub
rs.MoveLast
Debug.Print "Antal poster " & rs.RecordCount
End Sub
--
Mikkel Bundgaard
IT University of Copenhagen
http://officehelp.gone.dk
Codito, Ergo Sum