Assigns a process to an existing job object
#include <WinAPIProc.au3>
_WinAPI_AssignProcessToJobObject ( $hJob, $hProcess )
| $hJob | Handle to the job object to which the process will be associated. The handle must have the $JOB_OBJECT_ASSIGN_PROCESS access right. |
| $hProcess | Handle to the process to associate with the job object. The process must not already be assigned to a job. |
| Success: | True. |
| Failure: | False, call _WinAPI_GetLastError() to get extended error information. |
After you associate a process with a job object, the process is subject to the limits set for the job.
To set limits for a job, use the _WinAPI_SetInformationJobObject() function.
The process can be associated only with a single job.
The process inherits limits from the job it is associated with and adds its accounting information to the job.
If a process is associated with a job, all processes it creates are associated with that job by default.
_WinAPI_SetInformationJobObject
Suche nach AssignProcessToJobObject in der MSDN Bibliothek.
#include <WinAPIConv.au3>
#include <WinAPIHObj.au3>
#include <WinAPIProc.au3>
Local Const $sTemp = @TempDir & '\Test.au3'
; Create temporary .au3 file
Local $hFile = FileOpen($sTemp, 2)
For $i = 1 To 3
FileWriteLine($hFile, 'Run(@SystemDir & "\notepad.exe")' & @CRLF & 'Sleep(100)')
Next
FileClose($hFile)
; Run 3 times the "notepad.exe" and wait until you have closed all 3 processes
_RunWaitEx(@AutoItExe & ' /AutoIt3ExecuteScript "' & $sTemp & '"')
; Delete temporary .au3 file
FileDelete($sTemp)
Func _RunWaitEx($sCmd)
; Original idea by amel27
Local $tProcess = DllStructCreate($tagPROCESS_INFORMATION)
Local $tStartup = DllStructCreate($tagSTARTUPINFO)
Local $tInfo = DllStructCreate($tagJOBOBJECT_BASIC_ACCOUNTING_INFORMATION)
Local $hJob = _WinAPI_CreateJobObject()
If Not $hJob Then Return SetError(1, 0, 0)
DllStructSetData($tStartup, 'Size', DllStructGetSize($tStartup))
If Not _WinAPI_CreateProcess('', $sCmd, 0, 0, 0, BitOR($CREATE_BREAKAWAY_FROM_JOB, $CREATE_SUSPENDED), 0, 0, $tStartup, $tProcess) Then
Return SetError(1, _WinAPI_CloseHandle($hJob), 0)
EndIf
Local $hProcess = DllStructGetData($tProcess, 'hProcess')
Local $hThread = DllStructGetData($tProcess, 'hThread')
_WinAPI_AssignProcessToJobObject($hJob, $hProcess)
_WinAPI_ResumeThread($hThread)
_WinAPI_CloseHandle($hThread)
Do
If Not _WinAPI_QueryInformationJobObject($hJob, 1, $tInfo) Then
ExitLoop
EndIf
Sleep(100)
Until Not DllStructGetData($tInfo, 'ActiveProcesses')
_WinAPI_CloseHandle($hProcess)
_WinAPI_CloseHandle($hJob)
Return 1
EndFunc ;==>_RunWaitEx
Func _WinAPI_ResumeThread($hThread)
Local $aRet = DllCall('kernel32.dll', 'dword', 'ResumeThread', 'ptr', $hThread)
If @error Or (_WinAPI_DWordToInt($aRet[0]) = -1) Then Return SetError(1, 0, -1)
Return $aRet[0]
EndFunc ;==>_WinAPI_ResumeThread