| |
![](/forum/profile/get-photo.asp?memberid=27&type=profile&rnd=376) Elite Veteran
Beiträge: 860
![500](http://www.donkarl.com/forum/images/decorations/multiple/500.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) 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... | |
|