Ecrire dans la base de Registre avec VB6

Question

Bonjour,

Dans le but de faire fonctionner un EAO et d'empêcher les utilisateurs de "Bidouiller" l'ordinateur durant son utilisation,

Je désire vérrouiller/Déverrouiller la barre des tâches de windows en écrivant dans la base de Registre
les lignes suivantes :


Dim Clef
Set Clef= CreateObject("wscript.shell")

'Ecrire la clef
'Verrouille la barre des tâches
Clef.regwrite "HKEY_CURRENT_USER\SOFTAWARE\Microsoft\Windows\CurrentVersion\Policies\DisableTaskMgr" , &H1

'Déverrouille la barre des tâches
Clef.regwrite "HKEY_CURRENT_USER\SOFTAWARE\Microsoft\Windows\CurrentVersion\Policies\DisableTaskMgr" , &H1


Or le type de DisableTaskMgr passe de REG_DWORD à REG_SZ et le résultat escompté n'est au rendez-vous.

Quelqu'un peut-il me renseigner sur l'erreur que je fais ????

Merci !

crenaud76 · Answer

Il y a une source (je n'ai pas l'URL sous la main) qui donne le code VB6 pour écrire/lire dans le registre via API. Elle a été posté il y a 2 jours au plus ... tu la retrouvera sans difficulté

Christophe

acecel · Answer

regarde ici par exemple http://www.vbfrance.fr/code.aspx?id=3872