Cómo obtener un valor de la HKEY_CLASSES_ROOT en Visual Basic 6

La lectura de un valor de una clave de registro en Visual Basic 6 (VB6) es importante si su programa necesita acceder a la información, tales como la configuración del programa, almacenados en el registro. La almacenes de claves "HKEY_CLASSES_ROOT" com información de registro del registro de clase y también qué aplicaciones deben abrir ciertas extensiones de archivo. Puede utilizar las funciones de "QueryValueEx" VB6 "RegOpenKeyEx" y para leer los valores del registro de Windows.

Instrucciones

1 Abra el archivo de código fuente VB6 en un editor, como Microsoft Visual Basic 6.

2 Añadir un procedimiento que puede usar para consultar un valor de registro, añadiendo el código:

Private Sub GetRegKeyValue (sKeyName como secuencia, sValueName como secuencia)

Dim lRetVal As Long

Dim hKey As Long

Dim vValue como variante

lRetVal = RegOpenKeyEx (HKEY_CURRENT_USER, sKeyName, 0, KEY_QUERY_VALUE, hKey)

lRetVal = QueryValueEx (hKey, sValueName, vValue)

MsgBox vValue

RegCloseKey (hKey)

End Sub

3 Consultar el valor del registro mediante el procedimiento definido añadiendo el código:

GetRegKeyValue "HKEY_CLASSES_ROOT \ XML \ CLSID", "(predeterminado)"

Se abrirá un cuadro de mensaje con el valor de la clave proporcionada. Si no existe el valor, el procedimiento volverá con el código de error "2 - 'ERROR_BADKEY'." Reemplazar "HKEY_CLASSES_ROOT \ XML \ CLSID" con la tecla que está buscando y reemplazar "(predeterminado)" con el valor que desea consultar.

4 Guarde el archivo de código fuente VB6, compilar y ejecutar el programa para ver el valor de clave de registro.