Antal rows i recordset

F.eks. sådan:

dbConnection.Open DSN
Set rsRecordSet = dbConnection.Execute(strSQL)

ErTom = True
Do While Not rsRecordSet.EOF
    ErTom = False

    ' Skrive noget ud fra rsRecordSet

    rsRecordSet.MoveNext
Loop

If ErTom Then
    ' rsRecordSet var tomt - gør noget passende.
End If

Der er en .RecordCount som kan bruges, men det kan godt være den giver 0 eller -1 hele tiden når man bruger denne til at fylde recordsetet:
Set rsRecordSet = dbConnection.Execute(strSQL)


Så kan man skrive det sådan her så skulle RecordCount få en værdi:
rsRecordSet.Open strSQL, dbConnection, 1



Du kan tjekke om recordsetet er tomt med .EOF som vil blive sat til true. Så koden kan blive i stil med:

if rsRecordSet.EOF then
  Response.Write "Igen poster i databasen"
else
  Response.Write "Antal poster : " & rsRecordSet.RecordCount & "<br>"
end if

while not rsRecordSet.EOF
  response.write rsRecordSet("kolonne") & "<br>"
  rsRecordSet.Movenext
wend

Tak begge to for det hurtige svar, jeg har brugt eagleeye's løsning, da jeg så
også ved hvorfor jeg altid fik -1 når jeg brugte RecordCount.

Læg et svar.

// Kim

Ok så er her et svar :)