Access VBA .movefirst

Status
Niet open voor verdere reacties.

Jenger

Gebruiker
Lid geworden
26 jul 2012
Berichten
12
Hallo allemaal!

ik heb een vraagje. De database heb ik zo aangeroffen met al zijn codes. Nu ben ik bezig het een en ander om te zien hoe ik het kan verbeteren, zoniet vervangen.

Het zit namelijk zo:
Er is een formulier welke gebruikt wordt om resultaten in te voeren die in de tabel Resultaten wordt bewaard. Door op een knop te klikken op het formulier wordt een andere formulier geopend om de resultaten in te voeren. Maar als de tabel leeg is, en je klikt op de knop om het ander formulier te openen gaat het niet. Krijg je een bericht "No current record".

In de code wordt de index eerst doorzocht, wat standaard is,nl met .index
with Rsresultaat
.index="klas_index
If .recordcount <>0 then
.movefirst
end if

Als ik dit stukje code weghaal, dan krijg je een berichtje "Operation invalid without a current index".

Maar als ik het zo herschrijf zonder de .movefirst
with Rsresultaat
.index="klas_index
If .recordcount <>0 then
msgbox "Tabel Resultaten is leeg"
end if

dan krijg je dat bericht en opent het formulier om de resultaten in te voeren. Dus het werkt normaal door Al is het leeg.

Maar ik wil weten of dat wel goed is om de methode van .movefirst weg te halen.
Of gaat dat dan later een probleem geven? Hoe kan ik toch werken ondanks dat de resultaten tabel leeg is?


Alvast bedankt!
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan