функция определения время существования файла

#include <MsgBoxConstants.au3>
#include <FileConstants.au3>
#include <Date.au3>

MsgBox($MB_ICONINFORMATION + $MB_TOPMOST, "Пример", _FileTimeDiff(@ScriptFullPath))

Func _FileTimeDiff($sFile)
	Local $aT = FileGetTime($sFile, $FT_CREATED)
	If @error Then Return SetError(@error, @extended, 0)
	Local $iDiff = _DateDiff("s", $aT[0] & "/" & $aT[1] & "/" & $aT[2] & " " & $aT[3] & ":" & $aT[4] & ":" & $aT[5], _NowCalc())
	If @error Then Return SetError(@error, @extended, 0)
	Local $sFormat = Int($iDiff / 86400) & " д. "
	$iDiff = Mod($iDiff, 86400)
	$sFormat &= Int($iDiff / 3600) & " ч. "
	$iDiff = Mod($iDiff, 3600)
	$sFormat &= Int($iDiff / 60) & " м. "
	$iDiff = Mod($iDiff, 60)
	$sFormat &= Int($iDiff) & " с. "
	Return SetError(0, 0, $sFormat)
EndFunc   ;==>_FileTimeDiff