- ouvrir un process/application

Commenter

Contenu du snippet

oui ce code permet d'ouvrir/fermer 1 programme mais je me suis aussi sorti d'un virus avec

quand vous attrapez des virus qui bloques les executables, vous avez bien envi de faire une resto systeme: pb elle est bloquée(sa mé arrivé 2 fois)
alor g trouvé 1 truc
si vous arrivez a lancer vb tout de même, lancer la resto d'après ce code et sa contournera le virus(f'in moi je sui revenu de loi grace a sa plus tot que de formater mon disk)
voila pour ceux que sa peut aider
(ce code n'est pas de mwa mais j'y ai trouvé une bonne application)

Source / Exemple : 


Mettez ce code dans un Module :

Dim hProcess, nRet, Retour As Long
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

Pour lancer le programme :

Retour = shell("LeProg.exe",1)

Pour Fermer le programme :

hProcess = OpenProcess(fdwAccess, False, Retour)
GetExitCodeProcess hProcess, nRet
Call TerminateProcess(hProcess, nRet)
Call CloseHandle(hProcess)

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (moidarkjedi)