Ayant eu à dépanner un PC fortement perturbé par un virus: Plus d'icônes pour les disque durs,plus d'accès au Registre, plus d'accès au Panneau de configuration, des tas de fonctions disparues ou rendues inopérantes etc... etc... j'ai été amené à me pencher sur les Restrictions de configuration.
Voici donc le but de mon programme: Traquer les restrictions de configuration.
On pourra afficher et effacer les modifications de la clé:
HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Shared Tools\MSConfig\
J'ai commencé par mettre un code qui a été publié sur VB France (Merci à son auteur) et qui permet aussi de remplacer l'utilitaire de Configuration Système msconfig.exe contenu dans Windows\System32\dllcache et qui permet aussi de remplacer le Gestionnaire des Tâches taskmgr.exe contenu dans Windows\System32
Vous devez copier ces programmes et les coller dans le Dossier d'installation de mon programme, en les renommant MSConfigCopie.exe et TaskmgrCopie.exe (Ceux de Vista fonctionnent aussi bien sous XP que sous Vista.)
J'ai surtout ajouté un gestionnaire des Restrictions que l'on peut rencontrer dans la Base de
Registre au niveau des Sous-Clés des clés:
"Hkey_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer"
"Hkey_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer"
"Hkey_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\System"
"Hkey_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System"
"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\ActiveDesktop"
"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Network"
En cliquant sur les Sous-Clé on peut en connaître le rôle par consultation d'une Base contenue dans le fichier Restrictions.txt
On peut effacer ces clés et changer leur valeur (0 ou 1) si elles sont de type REG_DWORD (Pour
le moment je n'ai pas traité les clés REG_SZ qui sont moins gênantes et plus dures à traiter,
je crois.)
On peut afficher la Base de Données et sélectionner une clé pour la tester.
ATTENTION SAUVEGARDEZ votre BDR avant de "faire mumuse". Je ne serai pas responsable en cas de
problèmes.
Personnellement je n'en ai pas encore eu en testant.
NOTE: Quand vous faîtes un changement, fermez la BDR si elle est ouverte, puis ouvrez-là après
pour voir le résultat.
Parfois il faut rebootez pour voir les effets.
Vous allez être surpris par la lourdeur de certaines parties du Code.Il m'a fallu répéter des
lignes là où je pensais que Trim(Combo1.Text) & "\" & (Text1.Text) suffiraient alors qu'il a fallu mettre par exemple:
IntegerKey "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\" &
Text1.Text, Val(Trim(Text3.Text)).Pire, il m'a fallu faire un Copier/Coller du contenu de Combo1, une fois le programme lancé pour le copier dans le Code, afin d'obtenir le bon fonctionnement.(Problème de Font de taille, je n'ai jamais vu ça)
Si vous résolvez l'énigme vous faîtes signe.
Excusez-moi pour tout ce bla bla mais je pense qu'il est utile.