Exklusiven Zugriff auf die Datenbank
Karl Donaubauer
Gesendet: 05.09.22 10:46
Betreff: RE: Exklusiven Zugriff auf die Datenbank



Elite Veteran

Beiträge: 857
5001001001002525
Ort: Wien
Hallo, Ulrich!

Für mich ist die Situation unklar. Wann, bei welcher Aktion kommt die Fehlermeldung? Und was hat das mit dem geposteten Code zu tun?

Den Code könnte man sauberer formulieren, aber das dürfte nicht viel ändern:

'On Error Resume Next

Durch eine ordentliche Fehlerbehandlung ersetzen.

Dafür nach dem Öffnen des Recordsets prüfen, ob es Daten enthält, denn sonst hat der folgende Code keinen Sinn und produziert Fehler:

If Not rs.BOF Then
...
'rs.MoveFirst

weglassen, nach dem Laden steht der Zeiger in einem DAO-Recordset immer auf dem 1. DS

'db.Close

weglassen, CurrentDB kann man nicht schließen, den Fehler schluckt Access aber kommentarlos

-----
Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy...
Top of the page Bottom of the page