Dateiendung ändern funktioniert nicht

  • Access

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

    Dateiendung ändern funktioniert nicht

    Hallo Zusammen

    Habe folgendes Problem: Wir bekommen von der Bank regelmässig Dateien. Diese haben neuerdings die Endung .v11. Jedoch können sie in unserem System so nicht verarbeitet werden, also wollte ich in die Programmierroutine gleich die Umbenennung einfügen, damit das nicht immer manuell geschehen muss.
    Die Dateien müssten von .v11 auf . ohne nichts geändert werden.

    Folgenden Code wollte ich dazu verwenden:

    Visual Basic-Quellcode

    1. Name "G:\DATEN\BUCHHALT\G93\UBS\2010\*.v11" As "G:\DATEN\BUCHHALT\G93\UBS\2010\*."


    Jedoch bringt er mit einen Fehler, die Datei sei nicht vorhanden. Es muss aber woanders der Wurm drin sein, weil die Datei ist da.

    Kann mir jmd sagen was mit dem Befehl nicht stimmt?

    Freundliche Grüsse
    Luca


    PS: Sollte ich noch eine Antwort bekommen, es handelt sich um die Microsoft Visual Basic Version 6.5

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Lehrling91“ ()

    Konnte das Problem mithilfe eines anderen Forums lösen.


    Danke trotzdem.


    Vielleicht bekomm ich ja beim nächstem mal mehr hilfe^^

    Noch falls es jmd. interessiert: Bei Dateinamen ist * in VB nicht gültig.

    Hab so gelöst, dass ich zuerst die Datei mit der Endung .v11 suche und sie dann über Parameter umbennen.

    Visual Basic-Quellcode

    1. Dim Dat1$, Ordner$
    2. Ordner = "G:\DATEN\BUCHHALT\G93\UBS\2010"
    3. Dat1 = Dir$(Ordner & "\*.v11")
    4. Do Until Dat1 = ""
    5. Name (Ordner & "\" & Dat1) As (Ordner & "\" & Left$(Dat1, Len(Dat1) - 3))
    6. Dat1 = Dir$
    7. Loop


    Allen noch nen schönen Tag!