Manuel du langage de script Desktop Management › Fonctions › Fonctions de manipulation du registre › RegDeleteKey – Supprimer une clé de registre

RegDeleteKey – Supprimer une clé de registre

(Applicable à Windows)

La fonction RegDeleteKey supprime la clé spécifiée.

Format de la fonction :

RegDeleteKey(hKey as Integer, subkey as String) as Boolean

hKey

Indique une clé actuellement ouverte ou une clé prédéfinie, et peut être l'une des valeurs prédéfinies suivantes, disponibles sur toutes les plates-formes Windows :

HKEY_CLASSES_ROOT

HKEY_CURRENT_USER

HKEY_LOCAL_MACHINE

HKEY_USERS

subkey

Indique que le paramètre est une chaîne qui spécifie le nom de la clé à supprimer. Subkey doit être une sous-clé de la clé identifiée par hKey. N'utilisez pas une chaîne vide comme paramètre de sous-clé.

Une fois qu'elle a réussi, la fonction renvoie la valeur True. Si la clé n'existe pas ou qu'elle est ouverte par une autre application, la fonction renvoie la valeur False.

sous-clés

Sous Windows 9x, cette fonction supprime également toutes les sous-clés. Sous Windows NT et Windows 2000, vous devez supprimer séparément chaque sous-clé avant d'exécuter la fonction.

Exemple :

Structure de test :

HKLM\

\ Software

\ CA

\ Pour test uniquement

\ var_6

\ dummy

Dim hkey1 as integer

ClrScr()


hkey1 = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\CA\pour test uniquement")
if hkey1 = 0 then
	Print("Echec de RegOpenKey.")
	quitter
endif

if RegDeleteValue(hKey1) then
	Print("Réussite de RegDeleteValue.")
else
	Print("Echec de RegDeleteValue.")
endif

if RegDeleteVariable(hKey1, "var_6") then
	Print("Réussite de RegDeleteVariable pour var_6.")
else
	Print("Echec de RegDeleteVariable pour var_6.")
endif

RegCloseKey(hkey1)

hkey1 = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\CA")

if hkey1 = 0 then
	Print("Echec de RegOpenKey.")
	quitter
endif

if RegDeleteKey(hkey1, "dummy") then
	Print("Clé factice supprimée avec succès")
else
	Print("Echec de la suppression de la clé factice.")
endif

RegCloseKey(hkey1)

Messagebox("Vérifiez le Registre !", "test de script desktop management")

hkey1 = RegOpenKey(HKEY_LOCAL_MACHINE, "LOGICIEL")
if hkey1 = 0 then
	Print("Echec de RegOpenKey.")
	quitter
endif

if RegDeleteKey(hkey1, "CA\pour test uniquement") then
	Print("Clé ""CA\pour test uniquement"" supprimée avec succès")

else
	Print("Echec de la suppression de la clé " "CA\pour test uniquement".")
endif

if RegDeleteKey(hkey1, "CA") then
	Print("Clé CA supprimée avec succès")
else
	Print("Echec de la suppression de la clé CA.")
endif

RegCloseKey(hkey1)