ich habe ein seltsame Problem.
Ich möchte eine geöffnete Datenbank (Datei) löschen.
Ich schließe meine DB mit CloseDatabase(id) und lösche die Datei mit DeleteFile() was schief geht.
Mit Verwendung von FormatMessage() bekomme ich die Information
"Errorcode 20: Der Prozess kann nicht auf die Datei zugreifen, da sie von einem anderen Prozess verwendet wird"
Wie kann ich das lösen?
Danke und Gruß
MarcelX
Code: Alles auswählen
Procedure.s FormatMessage(ErrorCode)
Protected *Buffer, len, result.s
len = FormatMessage_(#FORMAT_MESSAGE_ALLOCATE_BUFFER|#FORMAT_MESSAGE_FROM_SYSTEM,0,ErrorCode,0,@*Buffer,0,0)
If len
result = "Errorcode " + Hex(ErrorCode) + ": " + PeekS(*Buffer)
LocalFree_(*Buffer)
ProcedureReturn result
Else
ProcedureReturn "Errorcode: " + Hex(ErrorCode)
EndIf
EndProcedure