Dateien kopieren mit Copyfile und Dateiname
Verfasst: 25.07.2012 22:02
Hallole,
ich will eine Datei in ein anderes Verzeichnis kopieren.
Hier ist der Code
Ich möchte ja schliesslich alle Dateien vom 25.05.2012 in die Testdatei-2 kopieren wie sie auch im Debuger angezeigt werden.
Wie macht man denn das, das es auch mit der 2.Version von CopyFile funktioniert?
Später will ich auch die Datei mit einer anderen Reihenfolge der Zahlen abspeichern und noch andere Abfragen machen, aber da sollte es erst mal so klappen.
Vielen Dank schon mal.
Michael
PS: Verwende PureBasic - 4.61 x64
ich will eine Datei in ein anderes Verzeichnis kopieren.
Hier ist der Code
Code: Alles auswählen
Directory$ = "d:\Testdatei-1"
If ExamineDirectory(0, Directory$, "*.*")
While NextDirectoryEntry(0)
tag=DirectoryEntryDate(0, #PB_Date_Modified)
datums.s= FormatDate("%dd/%mm/%yyyy", tag)
dateiName$ = DirectoryEntryName(0)
If datums.s="25/05/2012"
Debug DateiName$ ;die Dateien mit dem Datum 25.05.2012 werden im Debuger korrekt angezeigt
Debug datums.s
; Debug CopyFile("D:\Testdatei-1\82902060014807716010299.dat", "D:\Testdatei-2\82902060014807716010299.dat") ;das CopyFile funktioniert. Im Debuger wird auch "1" angegeben
Debug CopyFile("D:\Testdatei-1\DateiName$", "D:\Testdatei-2\DateiName$") ; das funktioniert nicht. Im Debuger ist auch "0" angegeben
EndIf
Wend
FinishDirectory(0)
EndIf
Wie macht man denn das, das es auch mit der 2.Version von CopyFile funktioniert?
Später will ich auch die Datei mit einer anderen Reihenfolge der Zahlen abspeichern und noch andere Abfragen machen, aber da sollte es erst mal so klappen.
Vielen Dank schon mal.
Michael
PS: Verwende PureBasic - 4.61 x64