#include <File.au3>
#include <array.au3>
Global $sPath = 'C:\Users\Public\Videos' ;Папка с файлами
Global $sFileType = '*.wmv' ;Расширение файлов для поиска
Global $LastDate = 0
Global $LastFileName = ''
Global $LastFolder = ''
;Поиск файлов в корневой директории
_LastFile($sPath)
;поиск вложеных папок
$AllFolder = _FileListToArray($sPath, Default, 2)
If Not @error Then
For $i = 1 To $AllFolder[0]
_LastFile($sPath&'\'&$AllFolder[$i])
Next
EndIf
ShellExecute($LastFolder & '\' & $LastFileName) ;Запуск последнего файла
Func _LastFile($sNewPath)
;поиск файлов в папке
$aFile = _FileListToArray($sNewPath, $sFileType, 1)
;выбор файла с самой позжей датой создания
If Not @error Then
For $i = 1 To $aFile[0]
$Date = FileGetTime($sNewPath & '\' & $aFile[$i], 1, 1)
If $Date > $LastDate Then
$LastDate = $Date
$LastFileName = $aFile[$i]
$LastFolder = $sNewPath
EndIf
Next
EndIf
EndFunc ;==>_LastFile