Bonjour,
config : xp sp2 / .net framework 2.0 / microsoft visual basic .net 2003
PB : RegOpenKeyEx => pas d'accès au registre ( devrait retourner 0 )
voici le code :
Const HKEY_LOCAL_MACHINE = &H80000002
Const KEY_ALL_ACCESS = &HF003F
DeclareFunction RegOpenKeyEx Lib "advapi32.dll" Alias "RegOpenKeyExA" (ByVal hKey AsLong, ByVal lpSubKey AsString, ByVal ulOptions AsLong, ByVal samDesired AsLong, ByRef phkResult AsLong) AsLong
et pour la verif : ( dans un button.click)
Dim phkresult AsLong
MsgBox(RegOpenKeyEx(HKEY_LOCAL_MACHINE, "SOFTWARE", 0, KEY_ALL_ACCESS, phkresult))
Et le msgbox ne renvoi pas le 0 attendu ... (d'ailleur pas non plus un code d'erreur connu)
quelqu'un aurait une idée svp ???
merci
Partager