OVH Cloud OVH Cloud

API Registre (le retour) SUITE ET FIN

2 réponses
Avatar
Jacques
Salut !

CA Y EST !!!!!!!!!!
J'ai enfin réussi avec cette ?/!!***??###//!!! de fonction RegQueryValueEx.
J'ai modifié mon code comme suit :

MySubKey = "00" & CStr(i) & vbNullChar
Reponse = RegOpenKeyEx(Resp, MySubKey, 0, KEY_QUERY_VALUE, Rep)
If Reponse = ERROR_SUCCESS Then
MySubKey = "Name" & vbNullChar
If RegQueryValueEx(ByVal Rep, ByVal MySubKey, 0, ByVal 0&, ByVal 0&,
lngData) = 0 Then
Dim strNF As String * 255 ' J'ai viré la variable
strNameFound
RegQueryValueEx ByVal Rep, ByVal MySubKey, 0, ByVal 0&, ByVal
strNF, lngData
End If
Else
MsgBox "Erreur lors de l'accès au Registre !", vbCritical + vbOKOnly,
"Erreur"
End If

Voilà. J'ai viré la variable strNameFound et créé une nouvelle juste avant
l'appel qui plantait. Ca marche sans problème.
Mais... je ne sais absolument pas pourquoi....
Bref.
Un grand merci à toi, Zoury pour ton aide.

A bientot,

Jacques

2 réponses

Avatar
Zoury
Bonjour Jacques! :O)

Voilà. J'ai viré la variable strNameFound et créé une nouvelle juste avant
l'appel qui plantait. Ca marche sans problème.
Mais... je ne sais absolument pas pourquoi....



humm.. l'avais-tu déclaré? Emplois-tu "Option Explicit" dans le haut de tes
Modules/Forms/Classes/..?

Un grand merci à toi, Zoury pour ton aide.



Ça me fait plaisir.

et en passant, la prochaine fois, poste tes réponses à la suite de la
discussion à laquelle ils se rapportent... j'étais encore en train de
chercher ton problème quand j'ai apperçu ce nouveau message dans la liste.
:O))

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
Avatar
Jacques
"Zoury" écrivait news:u0snNo#kDHA.3732
@tk2msftngp13.phx.gbl:

Salut !

humm.. l'avais-tu déclaré? Emplois-tu "Option Explicit" dans le haut de tes
Modules/Forms/Classes/..?



Absolument. Le Option Explicit est défini par défaut.

et en passant, la prochaine fois, poste tes réponses à la suite de la
discussion à laquelle ils se rapportent... j'étais encore en train de
chercher ton problème quand j'ai apperçu ce nouveau message dans la liste.
:O))




Dans ma précipitation pour poster (j'étais tout à ma joie d'avoir résolu le
problème), j'ai posté un nouveau msg (et comme je ne recharge pas les msgs
lus...)
Désolé
A la prochaine,

Jacques