Enlever son appli de la liste des taches


Commenter

Contenu du snippet

Comment faire pour cacher mon application de la liste des taches ( ex : je ne veux pas la voir lorsque je fais CTRL+ALT+SUPPR ) ?

Pour Cacher votre application de la liste des taches, il faut que votre appli soit un service !
Il y a une fonction qui permet de rendre un programme sous forme de service.

Mettez ce code dans un Module :

Source / Exemple : 


Private Const RSP_SIMPLE_SERVICE = 1
Private Const RSP_UNREGISTER_SERVICE = 0

Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
Private Declare Function GetCurrentProcess Lib "kernel32.dll" () As Long
Private Declare Function RegisterServiceProcess Lib "kernel32.dll" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long

Public Sub RendreService()
    Dim Pid As Long
    Dim regserv As Long

    Pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(Pid, RSP_SIMPLE_SERVICE)
End Sub

Public Sub PlusService()
    Dim Pid As Long
    Dim regserv As Long

    Pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(Pid, RSP_UNREGISTER_SERVICE)
End Sub

' Pour rendre votre appli en tant que service, mettez dans votre Form_Load :

Call RendreService

' Et Dans le Form_QueryUnload mettez

Call RendreService

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 (Nix)