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



Elite Veteran

Beiträge: 848
50010010010025
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
*********
https://www.donkarl.com/devcon Access-Online-Konferenz 18.+19.4.
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy...
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Top of the page Bottom of the page