ubiquitour.com

Como leer una Variable de entorno de sistema de usuarios utilizando VBScript

Para la programación con VBScript, puede que necesite leer una variable de entorno. Esto puede lograrse mediante el acceso a la Windows Script Host utilizando VBScript y haciendo uso del objeto shell. La mejor manera de aprender a acceder a las variables de entorno es con un ejemplo real que le guía a través de los pasos.

Instrucciones

1 Crear una variable de entorno de usuario. Haga clic en el orbe de Windows en la esquina inferior izquierda de tu escritorio para abrir el menú de inicio. Haga clic en "PC" y haga clic en "Propiedades del sistema". Haga clic en "Avanzadas de configuración del sistema". Se abre una ventana de diálogo. Haga clic en el botón "Variables de entorno" en la esquina inferior derecha. Haga clic en "Nuevo" justo debajo de las Variables de usuario. Escriba "prueba" en el campo "Nombre de la Variable" "y escriba su nombre en el campo"Valor de la Variable". Haga clic en el botón "OK" en la parte inferior de la ventana.

2 Abrir Bloc de notas haciendo clic en "Inicio" y escribir "Bloc de notas" en el cuadro de búsqueda. Haga clic en la aplicación cuando aparece en los resultados de la búsqueda anteriores. Crear un nuevo documento y guárdelo como "C:\Temp\ReadEnvVar.vbs".

3 Copie y pegue el código siguiente en Bloc de notas:

Opción explícita

' Declarar VariablesDim WshShl, Shell, UserVar

' Conjunto de objetosSet WshShl = WScript.CreateObject("WScript.Shell")Set Shell = WshShl.Environment("User")

' Variable de lecturaUserVar = Shell("Test")

' Valor de msgboxWScript.Echo "su nombre es" & UserVar & "!"

' Objetos de limpiezaSet WshShl = nadaSet Shell = nada

' Salir del ScriptWScript.Quit()

4 Guardar el archivo y salga de Bloc de notas.

5 Ejecute el script. Vaya a "C:\Temp\ReadEnvVar.vbs" y haga doble clic en el archivo. Un cuadro de mensaje debe aparecer su nombre. Seleccione "Aceptar".

6 Leer una variable de entorno del sistema mediante la sustitución de esta línea en su script:Set Shell = WshShl.Environment("User") – con la siguiente línea:

Set Shell = WshShl.Environment("System")

Reemplace esta línea – UserVar = Shell("Test") – con:

SysVar = Shell ("Insertar variable de sistema que desea leer aquí")

Por último, reemplace esta línea – WScript.Echo "su nombre es" & SysVar & "!", con las siguientes:

WScript.Echo UserVar

7 Guarde la secuencia de comandos y salga de Bloc de notas. Ahora tienes un VBScript capaz de leer una variable de entorno de usuario o del sistema.