Code : Tout sélectionner
RunProgram("explorer.exe", "C:\Users", "", #PB_Program_Wait)
Debug "ok"
PS: j'ai déjà essayé de mettre l'option #PB_Program_Open et aussi d'utiliser la fonction WaitProgram().
Code : Tout sélectionner
RunProgram("explorer.exe", "C:\Users", "", #PB_Program_Wait)
Debug "ok"
Code : Tout sélectionner
RunProgram("C:\","","",#PB_Program_Wait) ; j'ai pas users sous xp
Debug "ok"
Code : Tout sélectionner
prog = RunProgram("explorer.exe", "C:\Users", "", #PB_Program_Open)
hProcess = OpenProcess_(#PROCESS_QUERY_INFORMATION, 0, ProgramID(prog))
exitCode.l
GetExitCodeProcess_(hProcess, @exitCode)
debug exitCode
Repeat
GetExitCodeProcess_(hProcess, @exitCode)
Debug exitCode
Delay(1)
ForEver
Ca marche très bien ..RunProgram("notepad.exe", "", "", #PB_Program_Wait)
Debug "ok"