OVH Cloud OVH Cloud

Base de registre en VB6

6 réponses
Avatar
Thierry Laurent
Bonjour,

Est-ce que quelqu'un sait comment faire en VB6 pour écrire dans la base de
registre sous la clé HKEY_LOCAL_MACHINE ?
Est-ce possible en VB6 ? et sous cette clé ? et comment ?

Merci d'avance pour votre aide.

Thierry

6 réponses

Avatar
Zoury
Salut Thierry ! :O)

Jètes un oeil à ma classe CRegistry :
http://groups.google.com/groups?selm=OBOLjQZ%24EHA.2572%40tk2msftngp13.phx.gbl

La fonction à employer est SetValue()

Pour des exemples d'utilisation, fouille dans les archives du groupe sur
google :
http://groups.google.ca/groups?as_q=cregistry+%2BSetValue&num0&hl=fr&as_ugroup=*.fr.vb&as_uauthors=zoury

--
Cordialement
Yanick
MVP pour Visual Basic
Avatar
andre.araste
Bonjour

Pour une Lecture / Écriture, il faut utiliser cette batterie d'API :

Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal
hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long

Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA"
(ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long,
lpType As Long, lpData As Any, lpcbData As Long) As Long

Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA"
(ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long,
ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long

Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA"
(ByVal hKey As Long, ByVal lpValueName As String) As Long

Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long

--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.




"Thierry Laurent" a écrit dans le
message de news:
Bonjour,

Est-ce que quelqu'un sait comment faire en VB6 pour écrire dans la base de
registre sous la clé HKEY_LOCAL_MACHINE ?
Est-ce possible en VB6 ? et sous cette clé ? et comment ?

Merci d'avance pour votre aide.

Thierry


Avatar
François Picalausa
Hello,

Pour compléter les autres réponses, je te conseille de jeter un oeil à la
faq:
http://faq.vb.free.fr/index.php?rubrique=7

--
François Picalausa

"Thierry Laurent" a écrit
dans le message de news:

Bonjour,

Est-ce que quelqu'un sait comment faire en VB6 pour écrire dans la
base de registre sous la clé HKEY_LOCAL_MACHINE ?
Est-ce possible en VB6 ? et sous cette clé ? et comment ?

Merci d'avance pour votre aide.

Thierry


Avatar
Thierry Laurent
Merci beaucoup Zoury.

Cordialement,

Thierry

"Zoury" a écrit :

Salut Thierry ! :O)

Jètes un oeil à ma classe CRegistry :
http://groups.google.com/groups?selm=OBOLjQZ%24EHA.2572%40tk2msftngp13.phx.gbl

La fonction à employer est SetValue()

Pour des exemples d'utilisation, fouille dans les archives du groupe sur
google :
http://groups.google.ca/groups?as_q=cregistry+%2BSetValue&num0&hl=fr&as_ugroup=*.fr.vb&as_uauthors=zoury

--
Cordialement
Yanick
MVP pour Visual Basic





Avatar
Thierry Laurent
Merci beaucoup André.

Cordialement,

Thierry

"andre.araste" a écrit :

Bonjour

Pour une Lecture / Écriture, il faut utiliser cette batterie d'API :

Declare Function RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal
hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long

Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA"
(ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long,
lpType As Long, lpData As Any, lpcbData As Long) As Long

Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA"
(ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long,
ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long

Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA"
(ByVal hKey As Long, ByVal lpValueName As String) As Long

Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long

--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.
>

"Thierry Laurent" a écrit dans le
message de news:
> Bonjour,
>
> Est-ce que quelqu'un sait comment faire en VB6 pour écrire dans la base de
> registre sous la clé HKEY_LOCAL_MACHINE ?
> Est-ce possible en VB6 ? et sous cette clé ? et comment ?
>
> Merci d'avance pour votre aide.
>
> Thierry





Avatar
Thierry Laurent
Merci beaucoup François.

Cordialement,

Thierry

"François Picalausa" a écrit :

Hello,

Pour compléter les autres réponses, je te conseille de jeter un oeil à la
faq:
http://faq.vb.free.fr/index.php?rubrique=7

--
François Picalausa

"Thierry Laurent" a écrit
dans le message de news:

> Bonjour,
>
> Est-ce que quelqu'un sait comment faire en VB6 pour écrire dans la
> base de registre sous la clé HKEY_LOCAL_MACHINE ?
> Est-ce possible en VB6 ? et sous cette clé ? et comment ?
>
> Merci d'avance pour votre aide.
>
> Thierry