|
Ich habe nun schon Tage mit der Fehlersuche verbracht, evtl. kann mir ja jemand einen Tipp geben, warum ich folgenden Fehler (sporadisch) bekomme?
Aktualisierung nicht möglich; momentane Sperrung durch eine andere Sitzung auf diesem Rechner
Dir Procedur WaitFor hab ich eingefügt, da ich dachte, ggf. kolidiert der refresh.
Private Sub Befehl11_Click()
Dim strMsgNL As String
If Forms("FORMULAR").BOOLEAN = True Then MsgBox " FIXIERT "
If Forms("FORMULAR").BOOLEAN = False Then
strMsgNL = "wirklich FIXIEREN ? "
If MsgBox(strMsgNL, vbYesNo + vbQuestion, "Abbrechen:") = vbYes Then
call finalisieren
Me.Dirty = False
Me.Refresh
WaitFor (1)
Me.BOOLEAN = True
Me.Refresh
End If
End If
End Sub
Gruß David
|