Toon posts:

[VBA] RecordCount geeft niet juiste waarde

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik heb een form (R_A_Reparaties)met daarop een subform (SubMenu_RepratieAnalyse).
Ik wil in het veld Aantal (op het form) weergeven hoeveel records er in TOTAAL weergegeven worden op het subform.
Daarvoor hanteer ik momenteel deze code:

'tel het aantal records
Forms!Hoofd!SubMenu!Aantal_Reparaties.Value = Me.RecordsetClone.RecordCount

If Forms!Hoofd!SubMenu!Aantal_Reparaties.Value = 0 Then
' geen nvt
Forms!Hoofd!SubMenu!Aantal_Reparaties.Value = "NVT"
End If

Probleem hierbij is dat hij nu de waarde "16" weergeeft, dat is het aantal dat hij direct op het subform ziet (omdat deze niet groter is), scroll ik op het subform helemaal naar beneden dan telt hij ze wel alle "83".

Welke stukje code mis ik dat hij het hele subform doorloopt...

Verwijderd

DIt is een al oud en vrij bekend probleem, de recordset bevat op dat moment nog niet alle data, en heeft dan geen representatieve recordcount.

hiervoor zijn 2 oplossingen :
- Voordat je de recordcount opvraagt eerst even een rs.movelast en rs.movefirst uitvoeren
- je count apart ophalen, bijvoorbeeld door middel van een Select count(*).... SQL-statement