Base de registre - Lire une clé REG_BINARY

Question

Salut à tous !

J'ai un petit souci que je n'arrive pas à résoudre et je m'en remets donc à vous !

Voilà, j'aimerais récupérer le contenu d'une valeur REG_BINARY de la base de registre.
Mon code fonctionne bien avec les valeurs chaines et DWORD mais pas pour les REG_BINARY.

Voila mon code :

'Fonction pour lire les clés de la BdR
 Public Function Lire(clé As String)
Set regedit = CreateObject("WScript.Shell")
Lire = regedit.regread(clé)
End Function

'la par exemple cela fonctionne bien :
emplacement_wab = Lire("HKEY_CURRENT_USER\Software\Microsoft\WAB\WAB4\Wab File Name")
MsgBox (emplacement_wab)

'Mais pas là (clé accessible si Outlook est installé) !
emplacement_archive = Lire("HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\0a0d020000000000c000000000000046\001f0324")
MsgBox (emplacement_archive)

A mon avis, il faut surement déclarer la variable emplacement_archive d'une certaine façon, mais je ne vois pas.
Je ne veux faire que de la lecture sur cette clé, donc j'aimerai éviter les API. mais si cela est nécessaire, pouvez-vous m'indiquer la façon la plus simple pour les utiliser ?

Merci pour votre aide !

BruNews · Answer

Set regedit = CreateObject("WScript.Shell")
ceci est fait pour les scripts tels VBS, dans un prog c'est API et rien d'autre, VB est deja assez lourd sans avoir à lui coller une machine script en plus.

RegOpenKeyEx
RegQueryValueEx
RegCloseKey

ciao...
BruNews, MVP VC++

Base de registre - Lire une clé REG_BINARY

1 réponse

Votre réponse

Discussions similaires