Logfil vedligehold.

Jeg har en projekt hvor der bliver skrevet til en log når en bruger laver visse handlinger, grunden til at filen er en ekstern fil, er at andre programmer også kan skrive til logfilen.
Koden virker.

Mit spørgsmål er: Hvordan kan man slette i filen således at de sidste 1000 tranaktioner findes.

'*************************************************************

Option Compare Database

Private Const LogFilNavn = "Brugere.log"

Public Sub Log_Macro(MacroName As String, DeScript As String)
    On Error Resume Next
    Open DocParth1 & LogFilNavn For Append As #1
    Print #1, fOSUserName, "ACCESS", "" & MacroName & "", Now, DeScript
    Close #1
End Sub