Zugriffsrecht auf Datei

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Agent.

    Zugriffsrecht auf Datei

    Hallo,

    ich protokolliere jeden Zugriff auf mein "Programm". Hierfür wird der Username, der PC-Name sowie Datum und Uhrzeit in ein Textfile geschrieben.
    Wie kann ich nun mit VBA Rechte verteilen, so dass das Log-File nicht gelöscht oder geändert werden kann?
    Allerdings muss weiterhin gewährleistet sein, dass Daten an das File angehangen werden können.

    Visual Basic-Quellcode

    1. Private Sub Auto_open()
    2. On Error GoTo Err
    3. Pfad = "\\server\log\logfile.txt"
    4. Open Pfad For Append As #1
    5. Print #1, UserName & "," & ComputerName & "," & Date & "," & time
    6. Close #1
    7. Err:
    8. End Sub


    Ich möchte einfach nur, dass das File nicht geändert werden kann.

    Danke.

    Du kannst den Schreibschutz-Attribut mit SetAttr setzen. Ansonsten musst du es in Windows einstellen, ich denke nicht, dass man dort mit VBA zugreifen kann (aus Sicherheitsgründen).
    Gruß, Agent Smith 8-)

    activeFlags = (lazy OR weary)

    Lemgo-Verschwörung | Mathematics | VB-Paradise in blau