Registreringsdatabasen

Tags:    visual-basic

Hvordan kan jeg læse f.eks Hkey_Local_Machine\\Software\\MitPrograms navn\\?



2 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
<quote>Hvordan kan jeg læse f.eks Hkey_Local_Machine\\Software\\MitPrograms navn\\?</quote>

Nu ved jeg ikke om du har kigget på et af de besvarede indlæg, men den kan nu også være svær at finde men der står





Hvordan kan jeg lave,gemme,ændre noget i registerings databasen uden for
HKEY_CURRENT_USER\\micorsfot\\vb\\....\\...

håber nogen kan hjælpe mig!

mvh.
Thomas Christensen
;-)

jeg har selv fundet løsninge

som er som flg.

Global Const HKEY_CLASSES_ROOT = &H00000000
Global Const HKEY_LOCAL_MACHINE = &H80000002
Global Const HKEY_CURRENT_USER =&H00000001
Global Const ERROR_SUCCESS = &O0
Global Const APINULL = 0&
Global ReturnCode As Long

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

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

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


Function AbnNogle()

Dim hKey As Long
Dim lpSubKey As String
Dim phkResult As Long
Dim lpValuename As String
Dim lpReserved As Long
Dim lpType As Long
Dim lpData As Long
Dim lpcbData As Long
activeconnection = False

lpSubKey = "Microsoft\\windows\\CurrentVersion\\Polices\\Explore"
ReturnCode = RegOpenKey(HKEY_CURRENT_USER, lpSubKey, phkResult)

hvor hvis man deklære

RegSetValue kna sætte havd nøglen skal indeholde


RegCloseKey (hKey)
End If

mvh.
Thomas Christensen


:
Thomas :
:




og hvis du kan finde den i din vb, er der en dll åbner hvor ud kan se hvilke funktioner der er og hvordan du bruger dem?

mvh.
Thomas Christensen




<quote>Hvordan kan jeg læse f.eks Hkey_Local_Machine\\Software\\MitPrograms navn\\?</quote>

Hej,

jeg har sendt et program til dig, på e-mail.

Kim



t