Hallo zusammen,
was ist hier falsch?
Wenn eine oder beide Dateien vorhanden sind und älter als 5 Minuten soll die jeweilige Datei verschoben werden und dies im log vermerkt werden.
Aber beides klappt nicht. Bin am verzweifelen, wahrscheinlich hab ich Tomaten auf den Augen oder so ......
Danke für die Hilfe....
Spoiler anzeigen
#include <date.au3>
#include <file.au3>
$Dateiname1 = "test1"
$Dateiname2 = "test2"
$path1 = "D:\Temp"
$path2 = "D:Temp\Old"
$now = _NowTime(5)
$now = StringReplace($now, ":", "")
If FileExists($path1 & "\" & $Dateiname1) Then
$t = FileGetTime($path1 & "\" & $Dateiname1, 2, 0)
$filetime1 = $t[3] & ":" & $t[4] & ":" & $t[5]
$filetime1 = StringReplace($filetime1, ":", "")
If $now - $filetime1 > 500 Then
FileMove($path1 & "\" & $Dateiname1, $path2 & "\", 1)
_FileWriteLog($path2 & "\" & "log.txt", $Dateiname1 & " verschoben")
EndIf
;MsgBox(0, "unterschied " & $Dateiname1, $now - $filetime1)
If FileExists($path1 & "\" & $Dateiname2) Then
$t = FileGetTime($path1 & "\" & $Dateiname2, 2, 0)
$filetime2 = $t[3] & ":" & $t[4] & ":" & $t[5]
$filetime2 = StringReplace($filetime2, ":", "")
If $now - $filetime2 > 500 Then
FileMove($path1 & "\" & $Dateiname2, $path2 & "\", 1)
_FileWriteLog($path2 & "\" & "log.txt", $Dateiname2 & " verschoben")
EndIf
;MsgBox(0, "unterschied " & $Dateiname2, $now - $filetime2)
EndIf
Else
;MsgBox(0, "Datei vorhanden?", "Nein " & $now, 1)
_FileWriteLog($path2 & "\" & "log.txt", "keine Datei vorhanden")
EndIf
Bis bald
leertaste
