#include $path="C:\" $dirs=_FileListToArrayRec($path,"*",2+4+8,0,0,2) ArrayDisplay($dirs) dim $datadirs[$dirs[0]][$dirs[0]] $i=0 Do $datadirs[$i][0]=$dirs[$i+1] $i=$i+1 Until $i=$dirs[0] $i=0 Do $datadirs[$i][1]=FileGetTime(StringLeft($datadirs[$i][0],StringLen($datadirs[$i][0])-1),0,1) $i=$i+1 Until $i=$dirs[0] ArrayDisplay($datadirs) MsgBox(0,"",ArrayMax($datadirs))
$path="C:\"
$dirs=_FileListToArrayRec($path,"*",2+4+8,0,0,2)
ArrayDisplay($dirs)
dim $datadirs[$dirs[0]][$dirs[0]]
$i=0
Do
$datadirs[$i][0]=$dirs[$i+1]
$i=$i+1
Until $i=$dirs[0]
$i=0
Do
$datadirs[$i][1]=FileGetTime(StringLeft($datadirs[$i][0],StringLen($datadirs[$i][0])-1),0,1)
$i=$i+1
Until $i=$dirs[0]
ArrayDisplay($datadirs)
MsgBox(0,"",ArrayMax($datadirs))