Læsning af en værdi fra en nøgle i registreringsdatabasen i Visual Basic 6 ( VB6 ) er vigtigt, hvis dit program har brug for adgang til oplysninger, såsom programmets indstillinger , gemmes i registreringsdatabasen . Den " HKEY_CLASSES_ROOT " nøgle i registreringsdatabasen butikker COM class registreringsoplysninger og også hvilke programmer der åbne bestemte filtyper . Du kan udnytte VB6 " RegOpenKeyEx " og " QueryValueEx " funktioner til at læse værdier fra Windows registreringsdatabasen. Instruktioner
1
Åbn din VB6 kildefil i en editor , såsom Microsoft Visual Basic 6 .
2
Tilføj en procedure, du kan bruge til at forespørge en værdi i registreringsdatabasen , ved tilføjer koden : Hej
Private Sub GetRegKeyValue ( sKeyName As String , sValueName As String )
Dim lRetVal As Long
Dim HKEY As Long
Dim vValue som Variant
lRetVal = RegOpenKeyEx ( HKEY_CURRENT_USER , sKeyName , 0, KEY_QUERY_VALUE , HKEY )
lRetVal = QueryValueEx ( HKEY , sValueName , vValue )
MsgBox vValue
< p> RegCloseKey ( HKEY )
End Sub
3
Query værdien i registreringsdatabasen ved hjælp af definerede procedure ved at tilføje koden : Hej
GetRegKeyValue " HKEY_CLASSES_ROOT \\ XML \\ CLSID "," (standard) "
Dette vil åbne en besked boks med værdien i den medfølgende nøgle. Hvis værdien ikke findes, vil proceduren vende tilbage med fejlkode " 2 - ". ERROR_BADKEY ' " Erstat " HKEY_CLASSES_ROOT \\ XML \\ CLSID " med den nøgle, du søger efter, og erstat " ( standard)" med den værdi , du ønsker at forespørge .
4
Gem VB6 kildefilen , kompilere og køre program til at se den indskrive nøglen værdi.