Cómo determinar si una clave del Registro existe en VBScript

Mirando en el registro del sistema le da un vistazo a la configuración crítica del sistema operativo . Estos ajustes , llamada teclas , el control de la forma de trabajar de Windows. Los desarrolladores utilizan VBScript y otras herramientas para examinar y modificar las claves . Si usted necesita para comprobar que existe una clave específica antes de realizar una operación de registro, puede crear una función corta VBScript que consulta el registro. Instrucciones
1

Abrir Bloc de notas o un editor de texto y pega el siguiente código de VBScript en un nuevo documento :

Option Explicit Dim

keyName

keyName = " HKEY_CURRENT_USER \\ Software \\ Microsoft \\ Windows \\ CurrentVersion \\ Explorer \\ Wallpapers \\ "

Si KeyFound ( keyName ) " existe clave" = True Luego

Wscript.echo
< p > Otras ventas Wscript.echo "Clave no existe"

End If

" keyName " variable contiene el nombre de la clave de registro para el que es necesario buscar . Reemplazar " nombre" con una clave de su elección. La siguiente línea de código pasa ese nombre a una función llamada " KeyFound . " Esta función comprueba si existe la clave
2

Añadir este código debajo del código que se muestra en el último paso : .

Función KeyFound ( ByVal keyName )

keyFound = false

Dim rightCharacter

rightCharacter = derecha ( keyName , 1) spanish

si rightCharacter < > "\\" Entonces keyName = keyName y "\\ "

On Error Resume Next

CreateObject ( " wscript.shell ") RegRead trim ( keyName )

selecto caso err

caso 0 : . keyFound = true

final selecto

finales función

Esta es la función " KeyFound " . Se añade una barra al final de la clave si no existe ninguno y ejecuta el método " RegRead " . El " por error " declaración permite que el programa siga funcionando incluso si el método " RegRead " no puede localizar la clave de registro deseado. Si el método encuentra una llave , el código establece el valor de " keyFound " a true .
3

Guarde el archivo con la extensión VBS . Por ejemplo , si quieres llamarlo " CheckKeys , " guardar como " CheckKeys.vbs . "
4

Inicie el Explorador de Windows y busque el archivo. Haga doble clic en ese archivo para ejecutar el programa . Se ejecuta y muestra " existe clave" si encuentra la clave o " clave no existe" si no lo hace .