avec le code ci dessous :
Const PROCESS_QUERY_INFORMATION = &H400
Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long
Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long
puis dans :
sub ouvrir()
retour = Shell("d:\povray3\bin\pvengine.exe", 1)
end suv
sub fermer()
hProcess = OpenProcess(fdwAccess, False, retour)
GetExitCodeProcess hProcess, nRet
Call TerminateProcess(hProcess, nRet)
Call CloseHandle(hProcess)
end sub
c'est une source de Nix
elle fonctionnait quand j'étais sous Windows 98
maintenant que je suis sous windows 2000
la source ne marche plus
que dois je modifier? pour qu'elle marche?
a+
Yann