FileAppend, 샘플내용, sample.txt
Run, %A_ScriptDir%\sample.txt, , , 활성창PID
WinWaitActive, ahk_pid %활성창PID%
WinGetClass, 서비스그룹명, A
WinGet, 실행주체, ProcessName, A
WinGet, 실행주체위치, ProcessPath, A
명령어 := "Select * from Win32_Process where ProcessId="
객체생성 := ComObjGet("winmgmts:")
실행문 := 객체생성.ExecQuery(명령어 . 활성창PID)._NewEnum()
if 실행문[process]
{
파일위치 := process.CommandLine
StringReplace, 파일위치, 파일위치, "%A_Space%
StringReplace, 파일위치, 파일위치, ",, All
StringReplace, 파일위치, 파일위치, %실행주체위치%
}
else
{
MsgBox, 제어대상을 찾지 못했습니다.
}
MsgBox, %서비스그룹명%`n%실행주체%`n%실행주체위치%`n%파일위치%
return
