Серый форум — AHK: Завершить скрипт, содержащий определённый параметр ком. строки

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (alex22) — Fri, 16 Apr 2021 16:19:20 +0000

teadrinker пишет:

Знаками процента можно обрамлять только одну переменную. Но ещё можно так записать:
For Process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process WHERE ExecutablePath LIKE '%E:\\%'")
   WinClose, % "ahk_pid" . Process.ProcessId

Попробовал. Ошибку не выдаёт, но и программы не закрывает.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (teadrinker) — Thu, 15 Apr 2021 22:01:17 +0000

Знаками процента можно обрамлять только одну переменную. Но ещё можно так записать:

For Process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process WHERE ExecutablePath LIKE '%E:\\%'")
   WinClose, % "ahk_pid" . Process.ProcessId

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (alex22) — Thu, 15 Apr 2021 18:56:06 +0000

По-другому не умею. Пробовал

For Process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process WHERE ExecutablePath LIKE '%E:\\%'")
   WinClose, ahk_pid %Process.ProcessId%

Получил ошибку.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (teadrinker) — Wed, 14 Apr 2021 19:31:14 +0000

Так вы записываете каждый раз в одну переменную по очереди все процессы, а передаёте только самый последний записанный.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (alex22) — Wed, 14 Apr 2021 16:53:34 +0000

teadrinker пишет:

А зачем вы все процессы каждый раз заново в одну переменную записываете? И зачем там (1) ?

Зачем (1) понятия не имею, так в образце было. Процессы в переменную пишу чтобы в что в WinClose передать, как по другому?

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (teadrinker) — Wed, 14 Apr 2021 15:19:42 +0000

А зачем вы все процессы каждый раз заново в одну переменную записываете? И зачем там (1) ?
Но в любом случае придётся ждать, пока очередное окно закроется, если не примерить как-то многопоточность, ищите на форуме.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (alex22) — Wed, 14 Apr 2021 12:59:44 +0000

teadrinker
Спасибо, теперь заработало, хотя и не так, как хотелось бы: если Process.Terminate завершает ВСЕ найденные в цикле for подходящие процессы, то в переменную записывается PID только верхнего процесса, поэтому пока не будет закрыт текущий процесс, следующий команду на закрытие не получит. Даже на небольших прогах, которые запустил для эксперимента, долго вышло, а в реальной работе предвижу секунд 20-30. Или все же придется убивать особенно долго завершающиеся процессы, чего не хотелось бы.

DetectHiddenWindows, on
Loop
{
NN = 0
For Process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process WHERE ExecutablePath LIKE '%E:\\%'")
   NN := Process.ProcessId(1)
if NN = 0
   break
WinClose, ahk_pid %NN%
;WinWaitClose,,, 5
;if ErrorLevel
;WinKill, ahk_pid %NN%
;Process, Close,%NN%
}

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (Alectric) — Wed, 14 Apr 2021 12:27:55 +0000

Для закрытия окна пользуюсь этой функцией:

CorrectCloseProcess(WinTitle)
{
  loop,50
  {
    a++
    t:=a_tickcount
    SendMessage,WM_QUERYENDSESSION:=0x11,0,1,,% WinTitle
    d:=a_tickcount-t
    if (d>100)
      return -1
    b:=ErrorLevel
    SendMessage,WM_CLOSE:=0x10,,,,% WinTitle
    if (b="FAIL")
      return a
    sleep,10
  }
}

Возможно есть варианты лучше.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (teadrinker) — Wed, 14 Apr 2021 10:48:38 +0000

Обратный слеш нужно экранировать (удваивать).

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (alex22) — Wed, 14 Apr 2021 10:30:14 +0000

teadrinker
И как им воспользоваться?
Так не работает

For Process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process WHERE ExecutablePath LIKE '%E:\%'")
   NN := Process.ProcessId

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (teadrinker) — Wed, 14 Apr 2021 10:22:00 +0000

PID — свойство ProcessId.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (alex22) — Wed, 14 Apr 2021 10:14:41 +0000

Апну тему, потому что нужно почти то же самое - закрывать приложения, запущенные со съемного диска.

Александр_ пишет:

Только перебором всех процессов. Если нужен максимально короткий код, то через WMI:
For Process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process WHERE CommandLine LIKE '%calc%'")
   Process.Terminate(1)
Убьёт все процессы, содержащие в командной строке(включая и имя файла) подстроку "calc".

Код отличный, но нет ли возможности вместо terminate попытаться сначала закрыть окно, (пробовал заменить на CloseMainWindow - не работает). Или как-то добыть из цикла PID процессов для закрытия через WinClose.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (creature.ws) — Sat, 17 Dec 2011 14:04:34 +0000

Спасибо.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (alexii) — Sat, 17 Dec 2011 14:02:09 +0000

WMI and SQL и связанные темы.

Re: AHK: Завершить скрипт, содержащий определённый параметр ком. строки

null@example.com (creature.ws) — Sat, 17 Dec 2011 10:01:23 +0000

Позвольте околопредметный вопрос
Есть ли источник где можно ознакомится с синтаксисом WQL? Желательно с примерами построения запросов и описанием доступной функциональности.