Ved programmering med VBScript, kan du blive nødt til at læse en miljøvariabel . Dette kan opnås ved at få adgang til Windows Script Host hjælp VBScript og gøre brug af skallen objektet . Den bedste måde at lære at få adgang til miljøvariabler er med en virkelig verden eksempel, der fører dig gennem de trin. Hvad du har brug
Computer
Windows ( 98 eller nyere)
Vis Flere Instruktioner
1
Opret en bruger miljøvariablen. Klik på Windows kuglen i nederste venstre hjørne af dit skrivebord for at åbne menuen Start . Højreklik på "Computer" og klik derefter på " System Properties ". Klik på " Advanced System Settings ". En dialog åbnes. Klik på " miljøvariabler " knappen i nederste højre hjørne. Klik på " Ny" lige under User variabler. Skriv " test" i " Variabel Name " feltet ", og skriv dit navn i" Variable Value "feltet. Klik på " OK" knappen nederst i vinduet.
2
Åbn Notesblok ved at klikke på "Start" og skrive " notesblok " i søgefeltet. Klik på programmet, når det vises i søgeresultaterne ovenstående . Opret et nyt dokument og gemme det som "C: \\ Temp \\ ReadEnvVar.vbs " .
3
Kopier og indsæt følgende kode i Notesblok : Hej
Option eksplicit < br >
' Erklær VariablesDim WshShl , Shell, UserVar
' Sæt objectsSet WshShl = WScript.CreateObject ( " WScript.Shell " ) Set Shell = WshShl.Environment ("Bruger" )
' Læs variableUserVar = Shell ( "Test" )
' Output værdi msgboxWScript.Echo " Dit navn er " & UserVar & " ! "
' Oprydning ObjectsSet WshShl = NothingSet Shell = Nothing
' Exit ScriptWScript.Quit ()
4
Gem filen og afslut Notesblok.
5
Run scriptet. Gå til "C: \\ Temp \\ ReadEnvVar.vbs ", og dobbeltklik på filen. En meddelelse boksen skal poppe op vise dit navn. Vælg "OK".
6
Læs en systemmiljøvariabel ved at erstatte denne linje i scriptet -Set Shell = WshShl.Environment ("Bruger" ) - med følgende linje: < br >
Set Shell = WshShl.Environment ( "System" )
Erstat denne linie - UserVar = Shell ( "Test" ) - med : Hej
SysVar = Shell ( " Indsæt systemvariabel du ønsker at læse her " )
sidst erstatte denne linie - WScript.Echo " Dit navn er "& SysVar & " "- med følgende: !
WScript.Echo UserVar
7
Gem dit script og exit Notesblok. Du har nu en VBScript stand til at læse en bruger eller systemmiljøvariabel .