Slik leser du en bruker / System Environment Variable Bruke VBScript

Når du programmerer med VBScript, må du kanskje lese en miljøvariabel. Dette kan oppnås ved å åpne Windows Script Host ved hjelp VBScript og gjør bruk av skallet objektet. Den beste måten å lære hvordan du får tilgang miljøvariabler er med en ekte verden eksempel som leder deg gjennom trinnene.

Bruksanvisning

1 Opprett en bruker miljøvariabelen. Klikk på Windows-kule i nedre venstre hjørne av skrivebordet for å åpne Start-menyen. Høyreklikk på "Computer" og deretter "System Properties." Klikk "Avanserte systeminnstillinger." Åpner et dialogvindu. Klikk på "Miljøvariabler" -knappen i nedre høyre hjørne. Klikk på "Ny" rett under Brukervariabler. Skriv "test" i "Variable Name" feltet "og skriv navnet ditt i" Variabelverdi "-feltet. Klikk på "OK" -knappen nederst i vinduet.

2 Åpne Notisblokk ved å klikke på "Start" og skrive "notepad" i søkeboksen. Klikk på programmet når den vises i søkeresultatene ovenfor. Opprett et nytt dokument og lagre det som "C: \ Temp \ ReadEnvVar.vbs".

3 Kopier og lim inn følgende kode i Notisblokk:

alternativ eksplisitt

'Erklærer Variabler
Dim WshShl, Shell, UserVar

'Sett gjenstander
Sett WshShl = WScript.CreateObject ( "WScript.Shell")
Sett Shell = WshShl.Environment ( "Bruker")

'Les variabel
UserVar = Shell ( "Test")

"Output verdi til MsgBox
WScript.Echo "Ditt navn er" & UserVar & "!"

'Opprydding Objekter
Sett WshShl = Nothing
Sett Shell = Nothing

'Exit Script
WScript.Quit ()

4 Lagre filen og avslutt Notisblokk.

5 Kjør skriptet. Bla til "C: \ Temp \ ReadEnvVar.vbs" og dobbeltklikk på filen. En meldingsboks skal dukke opp som viser ditt navn. Velg "OK".

6 Les et system miljøvariabel ved å erstatte denne linjen i skriptet -
Sett Shell = WshShl.Environment ( "Bruker") - med følgende linje:

Sett Shell = WshShl.Environment ( "System")

Erstatt denne linjen - UserVar = Shell ( "Test") - med:

SysVar = Shell ( "Sett inn systemvariabel du vil lese her")

Endelig erstatte denne linjen - WScript.Echo "Ditt navn er" & SysVar & "!" - Med følgende:

WScript.Echo UserVar

7 Lagre skriptet og avslutte Notepad. Du har nå en VBScript i stand til å lese en bruker eller systemvariabelen.