FileCopy -> Error 70 Zugriff verweigert (Datei ist offen) umgehen

  • Access

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

    FileCopy -> Error 70 Zugriff verweigert (Datei ist offen) umgehen

    Hi,
    ich benutzt in einer Funktion die FileCopy-Methode mit einem Worddokument. Wenn das Dokument offen ist, funktioniert diese nicht. Das spricht doch etwas gegen die Logik eines Kopierbefehls, oder? Beim Ausschneiden würde ich die Fehlermeldung verstehen, aber beim Kopieren?

    Gibt es einen Weg, ein geöffnetes Worddokument zu kopieren?

    Vg
    mh

    Hier noch der Code um den es sich handelt:

    Visual Basic-Quellcode

    1. If fso.FileExists(frm![E-Text]) Then
    3. 'E-Text in den vorhergesehenen Ordner kopieren
    4. Zielpfad = Modul_ADB.GetConfigValue("EText_Datenpflege") & frm!ArtNr & "_" & strGG & "_" & frm!Bezeichnung & ".rtf"
    5. FileCopy frm![E-Text], Zielpfad



    /edit:

    Ahh, tut mir leid ich habe nicht ausführlich genug gesucht. Hier ist die Lösung

    Visual Basic-Quellcode

    1. Dim FsyObjekt As Object
    2. Set FsyObjekt = CreateObject("Scripting.FileSystemObject")
    3. FsyObjekt.CopyFile frm![E-Text], Zielpfad

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „hmrc“ () aus folgendem Grund: Code hinzugefügt

    Works as designed
    Aus dem Access-Help:
    Wenn Sie mit der FileCopy-Anweisung eine momentan geöffnete Datei kopieren möchten, tritt ein Fehler auf.

    Alternative:

    Visual Basic-Quellcode

    1. Set FSO = CreateObject("Scripting.FileSystemObject")
    2. FSO.CopyFile "c:\temp\test.docx", "c:\temp\test2.docx"
    --
    If Not Program.isWorking Then Code.Debug Else Code.DoNotTouch
    --

Facebook
Telefonspende