Добрый день, друзья.
Помогите с решением непростой проблемы.
Имеется скрипт, запускающий по хронометражу различные файлы, по их адресам.
Хронометраж и адреса файлов указаны в текстовом файле 1.txt
Но этот скрипт работает только на открытие файлов.
Как при помощи этого скрипта - закрывать определенные файлы - в определенный момент времени - если после названия файла в 1.txt стоит буква "з" ?
Помогите с решением непростой проблемы.
Имеется скрипт, запускающий по хронометражу различные файлы, по их адресам.
Хронометраж и адреса файлов указаны в текстовом файле 1.txt
Код:
#include <Timers.au3>
Opt("TrayAutoPause", 0)
OnAutoItExitRegister("_OnExit")
Global $sTimingsPath = @ScriptDir & "\1.txt", $aTimings, $aOut, $iWait, $iTimer, $hScriptWnd
$aTimings = FileReadToArray($sTimingsPath)
If @error Then Exit MsgBox(16, "Ошибка", "Ошибка записи в текстовый файл.")
AutoItWinSetTitle(@ScriptFullPath)
$hScriptWnd = WinGetHandle(@ScriptFullPath)
$aOut = StringRegExp($aTimings[0], "([0-9]{2}):([0-9]{2}):([0-9]{2})", 1)
If @error Then Exit MsgBox(16, "Ошибка", "Не удалось получить общее время работы.")
$iTimer = _Timer_SetTimer($hScriptWnd, $aOut[0] * 3600000 + $aOut[1] * 60000 + $aOut[2] * 1000, "_TimerExit")
$hTimer = TimerInit()
For $i = 1 To UBound($aTimings) - 1
$aOut = StringRegExp($aTimings[$i], "([0-9]{2}):([0-9]{2}):([0-9]{2}) (.+)", 1)
If Not @error Then
$iWait = $aOut[0] * 3600000 + $aOut[1] * 60000 + $aOut[2] * 1000
Do
Sleep(10)
Until TimerDiff($hTimer) >= $iWait
ShellExecute($aOut[3])
EndIf
Next
While 1
Sleep(10)
WEnd
Func _TimerExit($hWnd, $uMsg, $IDTimer, $dwTime)
Exit
EndFunc ;==>_TimerExit
Func _OnExit()
_Timer_KillTimer($hScriptWnd, $iTimer)
EndFunc ;==>_OnExit
Как при помощи этого скрипта - закрывать определенные файлы - в определенный момент времени - если после названия файла в 1.txt стоит буква "з" ?