Πώς να διαβάσετε ένα Μεταβλητή χρήστη /Σύστημα Περιβάλλον Χρησιμοποιώντας VBScript

Κατά τον προγραμματισμό με VBScript , μπορεί να χρειαστεί να διαβάσετε μια μεταβλητή περιβάλλοντος . Αυτό μπορεί να επιτευχθεί με την πρόσβαση στο Windows Script Host χρησιμοποιώντας τη VBScript και κάνοντας χρήση του αντικειμένου κελύφους . Ο καλύτερος τρόπος για να μάθετε πώς μπορείτε να αποκτήσετε πρόσβαση σε μεταβλητές περιβάλλοντος είναι ένα πραγματικό παράδειγμα κόσμο που σας καθοδηγεί βήμα προς βήμα . Τα πράγματα που θα χρειαστείτε
Υπολογιστών
των Windows ( 98 ή νεότερη έκδοση)
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Δημιουργήστε μια μεταβλητή περιβάλλοντος χρήστη . Κάντε κλικ στην σφαίρα των Windows στην κάτω αριστερή γωνία της επιφάνειας εργασίας σας για να ανοίξετε το μενού Έναρξη . Κάντε δεξί κλικ στο "Computer" και στη συνέχεια κάντε κλικ στο κουμπί " Ιδιότητες συστήματος ". Κάντε κλικ στο " Ρυθμίσεις συστήματος για προχωρημένους . " Παρουσιάζεται παράθυρο διαλόγου . Κάντε κλικ στο κουμπί " Μεταβλητές Περιβάλλοντος " στην κάτω δεξιά γωνία . Κάντε κλικ στο " Νέο " ακριβώς κάτω από μεταβλητές χρήστη . Πληκτρολογήστε " τεστ " στο " Μεταβλητή Όνομα " πεδίο " και πληκτρολογήστε το όνομά σας στο πεδίο" Variable Value " πεδίο . Κάντε κλικ στο κουμπί "OK " στο κάτω μέρος του παραθύρου . 2

Ανοίξτε το Notepad κάνοντας κλικ στο " Start" και πληκτρολογώντας " σημειωματάριο " στο πλαίσιο αναζήτησης . Κάντε κλικ για την εφαρμογή , όταν εμφανίζεται στα αποτελέσματα αναζήτησης πάνω . Δημιουργήστε ένα νέο έγγραφο και αποθηκεύστε το ως " C : \\ Temp \\ ReadEnvVar.vbs " .
Εικόνων 3

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο Σημειωματάριο :

Επιλογή ρητή

' αναγνωρίσει VariablesDim WshShl , Shell , UserVar

' Set objectsSet WshShl = WScript.CreateObject ( " WScript.Shell " ) Set Shell = WshShl.Environment ( "Χρήστης " )

' Διαβάστε variableUserVar = Shell ( "Test" )

« τιμή εξόδου στην msgboxWScript.Echo " Το όνομά σου είναι " & UserVar & " ! "

« Εκκαθάριση ObjectsSet WshShl = NothingSet Shell = Τίποτα

« Έξοδος ScriptWScript.Quit ( )
Η

4 Αποθηκεύστε το αρχείο και την έξοδο σας Notepad .
5

Run το σενάριο . Μεταβείτε στο " C : \\ Temp \\ ReadEnvVar.vbs " και κάντε διπλό κλικ στο αρχείο . Ένα πλαίσιο μηνύματος θα πρέπει να εμφανιστεί παρουσιάζοντας το όνομά σας . Επιλέξτε το " OK".
Η 6

Διαβάστε μια μεταβλητή περιβάλλοντος συστήματος, αντικαθιστώντας αυτή τη γραμμή σας σενάριο -Set Shell = WshShl.Environment ( "Χρήστης" ) - με την ακόλουθη γραμμή :

Ορισμός Shell = WshShl.Environment ( "Σύστημα" )

Αντικαταστήστε αυτήν τη γραμμή - UserVar = Shell ( "Test" ) - με :

SysVar = Shell ( " εισάγετε μεταβλητή του συστήματος που θέλετε να διαβάσετε εδώ " )

Τέλος , αντικαταστήστε αυτή τη γραμμή - WScript.Echo " το όνομά σου είναι " & SysVar & " " - με τα εξής : !

WScript.Echo UserVar
Η

7 Αποθηκεύστε το σενάριο και Σημειωματάριο έξοδο . Τώρα έχετε ένα VBScript μπορεί να διαβάσει ένα χρήστη ή μεταβλητή περιβάλλοντος συστήματος .
Η
εικόνων