Серый форум — AHK: Завершение процесса без скрытого окна

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Wed, 14 May 2014 01:58:57 +0000

Я написал

taskkill /F /IM pidgin.exe

не просто так, ключ /F потребовался т.к. дигностика говорила что задача запущена извне и это всё относилось к сетевым ПО, а обычные закрываются просто и без проблем.

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Malcev) — Tue, 13 May 2014 15:59:12 +0000

While WinExist("ahk_exe" Procname)
    WinClose

А если окно не закроется - получается вечный цикл и затык.
Поэтому правильней так:

winGet, winHwnd, List, % Procname
loop % winHwnd
  winClose, % "ahk_id " winHwnd%a_index%

Re: AHK: Завершение процесса без скрытого окна

null@example.com (serzh82saratov) — Sat, 19 Apr 2014 09:48:36 +0000

UTF-** это кодировка текста. Есть AutoHotkey Unicode, 64 bit.

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Sat, 19 Apr 2014 09:26:58 +0000

bWRmeA сорри... опять опечатался

Исправлено - Дополнено

Re: AHK: Завершение процесса без скрытого окна

null@example.com (bWRmeA) — Sat, 19 Apr 2014 09:16:59 +0000

Братишка, отсыпь и мне немного UTF-64 символов.

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Fri, 18 Apr 2014 21:23:34 +0000

Для справки
Функция StdIn для AHK понимает и работает в ANSI-32, UTF-32 и UTF-64, но я проверял её только в UTF-64

P.S. Опции языка/компилятора - AHK_L ANSI-32 и UTF-32/64 (Unicode)

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Thu, 17 Apr 2014 23:46:39 +0000

Вот конечный вариант - рабочий, но он без модуля обработки консоли... это очень много строк

; Запрет повторного запуска
#SingleInstance
#Include C:\AHK\AllSystemOS\              ; Устанавливаем путь к файлам скрипта
#Include RunCon.ahk                       ; Запуск с консоли

 сMsg_OkTaskModalInfo  := 4+8192+64 ;Function Yes/No button  + Task Modal + Icon Asterisk(info)

 ; Завершаем процессы
  titul := "Результат закрытия процессов" 
  arMain := [["taskkill /F /IM pidgin.exe",""]
            ,["taskkill /F /IM uTorrent.exe",""]
            ,["taskkill /F /IM thunderbird.exe",""]
            ,["",""]]            
  res := "`n`n"
  i := 1
  While (arMain[i,1])
    {
      CmdLine := arMain[i,1]
      RunCon(CmdLine, 0, Output)
      arMain[i,2] := Output  "`n"
      res := res  arMain[i,2]
      i++
    }
  res := res "`n Запускаем SKYPE - ДА / НЕТ ?"
  MsgBox, % сMsg_OkTaskModalInfo, % titul, % res, 20
  IfMsgBox, No
    goto lExt
; Запусаем "C:\Program Files (x86)\Skype\Phone\Skype.exe"  
  SetTitleMatchMode, 2
  Run, C:\Program Files (x86)\Skype\Phone\Skype.exe
  Sleep 5000 ;5 секунд на отработку старта 
lExt:  
  ExitApp

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Thu, 17 Apr 2014 17:03:39 +0000

serzh82saratov да, так поступил

Написал

C:\Users\SASA>taskkill /IM pidgin.exe
Успех: Отправлен сигнал завершения процессу "pidgin.exe" с идентификатором 3776.

фигушки, т.е. он разрывает соединение с интернетом и переустанавливает его и спокойно продолжает работать.

Написал

C:\Users\SASA>taskkill /F /IM pidgin.exe
Успешно: Процесс "pidgin.exe", с идентификатором 3424, был завершен.

помогло

Как вариант, у меня написана функция реализации StdIn для AHK - могу ей воспользоваться, а может что есть более простое?

Re: AHK: Завершение процесса без скрытого окна

null@example.com (serzh82saratov) — Thu, 17 Apr 2014 16:27:40 +0000

Значит закрывать процесс, и проверять что выполнено.

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Thu, 17 Apr 2014 16:22:18 +0000

Вариант не помогает

DetectHiddenWindows, On
Procname = pidgin.exe
While WinExist("ahk_exe" Procname)
    WinClose ahk_exe %Procname%

Идёт бесконечная попытка закрытия, вот часть лога

---- C:\AHK\AllSystemOS\LA2_start.ahk
013: DetectHiddenWindows,On
014: Procname = pidgin.exe
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.13)
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.13)
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.12)
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.13)
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.13)
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.13)
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.13)
015: While,WinExist("ahk_exe" Procname)
016: WinClose,ahk_exe %Procname% (0.12)
015: While,WinExist("ahk_exe" Procname)

Что теперь не так?

Re: AHK: Завершение процесса без скрытого окна

null@example.com (serzh82saratov) — Thu, 17 Apr 2014 08:52:44 +0000

Правильно, достаточно и:


While WinExist("ahk_exe" Procname)
    WinClose

Re: AHK: Завершение процесса без скрытого окна

null@example.com (bWRmeA) — Thu, 17 Apr 2014 08:49:23 +0000

WinExist("ahk_exe" Procname)

WinClose ahk_exe %Procname%

зачем искать окно дважды?

Re: AHK: Завершение процесса без скрытого окна

null@example.com (serzh82saratov) — Thu, 17 Apr 2014 08:34:12 +0000


DetectHiddenWindows, On
Procname = pidgin.exe
While WinExist("ahk_exe" Procname)
    WinClose ahk_exe %Procname%

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Thu, 17 Apr 2014 08:29:17 +0000

serzh82saratov написал

Procname = pidgin.exe
While WinExist("ahk_exe" Procname)
    WinClose ahk_exe %Procname%

Увы не срабатывает, что не так?

Re: AHK: Завершение процесса без скрытого окна

null@example.com (Indomito) — Thu, 17 Apr 2014 08:04:32 +0000

Поправил... нет, нельзя сидеть одновременно на 3-х форумах