[已解决]AU3如何现实提取最新的文件！

ssjoe

如D盘下A的文件夹有5个文件，怎样提取最后创建的文件！

需要把文件列出来，还需要把最新的文件单一提示出来，谢谢各位大虾帮忙！

ssjoe

怎么没有帮忙的人呢？是我表达方式不对还是怎样，能提出一下吗？

smartzbs

#include <File.au3>
#include <Array.au3>

$sDir = @ScriptDir
If StringRight($sDir, 1)="\" Then $sDir = StringTrimRight($sDir, 1)

$aFile = _FileListToArray(@ScriptDir)
Local $sFile , $FileTime, $TimeRec
For $i = 1 To UBound($aFile)-1
        ;参数0根据需要修改
        ;0 = Modified (default)
        ;1 = Created
        ;2 = Accessed
        $FileTime = FileGetTime($sDir & "\" & $aFile[$i], 0)
        $FileTime = _ArrayToString($FileTime, "")
        If $FileTime>$TimeRec Then
                $TimeRec = $FileTime
                $sFile = $aFile[$i]
        EndIf
Next
ConsoleWrite("最后文件:"&$sFile)

ssjoe

非常谢谢楼上的热心，问题已经得到解决！