Comment supprimer une clé registre avec tous ses sous clés ?Résolu

Question

Comment supprimer une clé registre avec tous ses sous clés ?
Depuis des heures j'essaye des combinaisons ,mais tjrs machin erreur par ici par la , j'ai fini par chopper la migraine .
Merci d'avance.

Utilisateur anonyme · Accepted Answer

111Z, si tu veux un exemple, t'as qu'a voir ma source qui le fait justeent. Et je pense pas que ce soit la seul.
Voir la méthode DeleteKey: 

"Fonction pour supprimer une clé du registre avec toutes celle qui s'y trouve dedans"


C'est pas ce que tu veux ca ? hein ?




__________
Kenji

mortalino · Answer

Salut, essaie un truc de ce genre là : Option Explicit Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" (ByVal hKey As Long, ByVal lpSubKey As String) As Long Public Sub SupprimerClé(Raçine As Long, NomClé As String) Dim Résultat As Long Résultat = RegDeleteKey(Raçine, NomClé) End Sub Sub Exemple() Call SupprimerClé(HKEY_CURRENT_USER, "Software ata iti") End Sub ~ [code.aspx?ID=39466 Mortalino] ~ @++

--Mortalino-- Le mystérieux chevalier, "Provençal, le Gaulois"

111z · Answer

Non ça marche pas , il est impossible de supprimer une clé qui contient des sous clés.
je crois qu'il faudra scaner les clés et les sous clés et le sous sous clés etc ... puis les supprimer une par une, c'est comment faire ça que
je cherche en faites.

Utilisateur anonyme · Answer

Salut,

Regarde sur les nombreuses sources qui font la gestion du registre. C'est pas ce qui manque.





__________
Kenji

111z · Answer

Charles
Je cherche pas à lire/écrire/supprimer une clé , je cherche à supprimer une clé avec tous les sous clés et les sous sous clés.
Si tu as deja tomber sur une source qui fait ça , je serais ravi si tu me donne le lien.


 


Merci

111z · Answer

Apparement va falloir que que je me creuse la tete pour trouver moi meme

jmfmarques · Answer

Ami 111z

Tu es ici sur le forum VB.

Ce qu'il convient de faire, dans un tel cas de figure, nécessite moins la connaissance de VB que celle de Windows.

Tu vas voir :

Si tu connais windows, tu sais qu'il est possible d'exporter une clé (avec ses sous-clés) de la base de registre, à partir de Regedit.

Tu sais également que tu obtiens alors un fichier .reg, que tu peux manipuler...

Alors :

Intéresse-toi à donc Reg.exe (ce n'est pas du VB).
Il ne te restera ensuite qu'à exécuter tes commandes depuis VB....

A toi de jouer (après avoir bûché Reg.exe...)
Amitiés

mortalino · Answer

Je t'ai filé RegDeleteKey, beh voici RegDeleteValue : Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal hKey As Long, ByVal lpValueName As String) As Long ~ [code.aspx?ID=39466 Mortalino] ~ @++

--Mortalino-- Le mystérieux chevalier, "Provençal, le Gaulois"

111z · Answer

jmfmarques et mortalino  c'est trop facile comme reponse ,,à ce que je vois je me suis pas fait comprendre une fois de plus.
ce que je veux c'est une fonction ou sub du genre RegDeleteTree   (disponibledans la lib Lib "advapi32.dll" de Windows Vista).
je veux supprimer une clé dont Les noms et le nombre des sous clé n'est pas fixe , ça peux changer d'une machine à l'autre.
J'ai penser à scaner la clé en question et de stocker les chemins des sous clé dans un tableau puis les supprimer avec une boucle , c le principe , je vais m'y mettre
dés que je sentirai la force.
que la force soit avec moi

111z · Answer

EHH Je viens de trouver ta class CHARLES, c'est ce que je cherchais en faite , au moin je me suis pas tromper sur le principe Sympa aussi ton GUN http://www.vbfrance.com/codes/CLASS-POUR-REGISTRE_26277.aspx PublicFunction DeleteKey(ByVal hKey As eHKey, ByVal Section As String)

OnErrorResumeNext
Dim KeyValue As Long
Dim SubKey() As String
Call ReadRegistryKeys(hKey, Section, SubKey) '// On cherhce les clés contenu dans la clé
Dim i As Integer
For i = 0 To UBound(SubKey) '// Boucle sur toutes les clés qui sont dans la clé
If Err.Number = 9 ThenExitFor'// Si li n'y a pas de clé on quitte la boucle
Call DeleteKey(hKey, Section & "" & SubKey(i)) '// Rapelle la fonction pour supprimer les clés qui sont dans les clés trouvé
Err.Clear'// Efface les erreurs
Call RegOpenKeyEx(hKey, vbNullChar, 0&, KEY_ALL_ACCESS, KeyValue) '// Ouverture
Call RegDeleteKey(KeyValue, Section & "" & SubKey(i)) '// Supprime la clé
Call RegCloseKey(KeyValue) '// Fermeture
Next i
Call RegOpenKeyEx(hKey, vbNullChar, 0&, KEY_ALL_ACCESS, KeyValue) '// Ouverture
Call RegDeleteKey(KeyValue, Section) '// Supprime la clé du début
Call RegCloseKey(KeyValue) '// Fermeture
EndFunction' _

111z · Answer

Merci à toi Charles et à tous qui ont pris la peine de me repondre.

Comment supprimer une clé registre avec tous ses sous clés ?

11 réponses

Votre réponse

Discussions similaires