ssjoe 发表于 2011-1-28 12:59:19

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

本帖最后由 ssjoe 于 2011-1-29 14:55 编辑

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

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

ssjoe 发表于 2011-1-29 02:33:00

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

smartzbs 发表于 2011-1-29 09:07:22

#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 发表于 2011-1-29 14:55:15

非常谢谢楼上的热心，问题已经得到解决！
页: [1]
查看完整版本: [已解决]AU3如何现实提取最新的文件！