Поиск самой новой папки

SetWorkingDir, d:\Temp\ ;папка в которой скрипт будет искать самую свежую папку
newest = 0
filename = ''
Loop , *.*, 2 ; параметр "2" заставит скрипт перечислять только папки
{
    ;MsgBox, , Дата файла, %A_LoopFileName%`n%A_LoopFileTimeCreated%
    If (A_LoopFileTimeCreated > newest)
    {
        newest := A_LoopFileTimeCreated
        filename := A_LoopFileName
    }
}
MsgBox, , Самый новый файл, Имя папки: %filename%`nДата создания: %newest%