Bonjour,
Svp, j'aime killer un child process en VB6.
A est le processus de départ
De A je cree un nouveau processus B (donc je connais son hWnd via la propriete hwnd de vb6 et je stock dans A)
Je rend B un fils de A avec SetParent.(ici la question, le hwnd va changer ou juste un lien entre le pere et fils)
De A je cree un nouveau form on l'appel D (et je passe le hwnd de B).
Je veux de D fermer le processus B.
J'ai essayé avec :
Dim Result&, Task&
Result = CLng(List2.list(List1.ListIndex)) ' c'est le hWnd de B
Task = OpenProcess(PROCESS_TERMINATE, 0&, Result)
Result = TerminateProcess(Task, 1&)
Result = CloseHandle(Task)
rien ne se passe :'(.
J'ai essayé avec :
Dim Result&
Dim lngProcessID As Long
Dim lngReturnValue As Long
Dim lngProcess As Long
Result = CLng(List2.list(List1.ListIndex)) ' c'est le hWnd de B
lngReturnValue = GetWindowThreadProcessId(Result, lngProcessID)
lngProcess = OpenProcess(PROCESS_TERMINATE, 0&, lngProcessID)
lngReturnValue = TerminateProcess(lngProcess, 0&)
Result = CloseHandle(lngProcess)
Cette fois il termine le processus A et tt ses processus :'(
J'espere que c'est clair
Merci d'avance.