Soyez le premier à donner votre avis sur cette source.
Snippet vu 17 768 fois - Téléchargée 29 fois
'A mettre dans un module !! 'Pour Bloquer le TSKMGR Public Sub BloqTsk() RegEcrire 0, "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", "0" End Sub Public Sub OpenTsk() RegEcrire 0, "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", "-1" End Sub '---------------------------------------------------------------------------------------------------------------------- 'La suite du Code n'est pas de moi, mais de SPR, trouvé sur VB Codes Sources... '---------------------------------------------------------------------------------------------------------------------- Public Sub RegLire(CheminComplet As String, Destination As String) 'permet de lire une valeur dans la base de registre Set WshShell = CreateObject("Wscript.Shell") Destination = WshShell.RegRead(CheminComplet) 'Remarque :HKEY_CURRENT_USER peut être remplacé par HKCU 'On peut mettre n'importe quelle branche comme ça End Sub Public Sub RegEcrire(StyleDeClé As Integer, CheminComplet As String, Valeur As String) 'Permet d'écrire dans la base de registre tout type de valeur (valeur chaîne, dword, binaire) ou de créer une nouvelle branche .... 'Style de Clé : '0 -> Valeur Chaîne '1 -> DWord '2 -> Binaire Set WshShell = CreateObject("Wscript.Shell") If StyleDeClé = 0 Then WshShell.RegWrite CheminComplet, Valeur If StyleDeClé = 1 Then WshShell.RegWrite CheminComplet, Valeur, "REG_DWORD" If StyleDeClé = 2 Then WshShell.RegWrite CheminComplet, Valeur, "REG_BINARY" End Sub Public Sub RegSupprimer(CheminComplet As String) 'Permet d'effacer dans la base de registre tout type de valeur (valeur chaîne, dword, binaire) Set WshShell = CreateObject("Wscript.Shell") WshShell.RegDelete CheminComplet End Sub '----------------------------------------------------------------------------------------------------------------------
2 juin 2014 à 11:31
2 juil. 2008 à 17:01
2 juil. 2008 à 08:00
De plus quelque soit la version c'est éfficace, mais attention ca dépand de l'utilisateur :
Si tu exécute le blocage chez un utilisateur, les autre on toujours acces au gesionnaire de tache.
1 juil. 2008 à 21:56
16 oct. 2007 à 14:40
Merci beaucoup
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.