Hi, I have this function: Func TimeDate() For $i = 1 To $aList[0] $sdate = FileGetTime($sRoot & "\" & $aList[$i], 0, 1) $ydate = StringMid($sdate,1,4) $mdate = StringMid($sdate,5,2) $ddate = StringMid($sdate,7,2) $htime = StringMid($sdate,9,2) $mtime = StringMid($sdate,11,2) $stime = StringMid($sdate,13,2) MsgBox(0, "Folder date", $sRoot & "\" & $aList[$i] & @CRLF & @CRLF & "Date: " & $ydate&"/"&$mdate&"/"&$ddate & @CRLF & @CR