Πώς να στείλετε Vars Από VBScript σε ένα αρχείο παρτίδας

Batch αρχεία , που χρησιμοποιείται ευρέως κατά τη διάρκεια των DOS computing ημέρες , εξακολουθούν να βοηθήσει τους προγραμματιστές να εκτελούν χρήσιμες εργασίες των Windows . Εάν εργάζεστε με VBScript , για παράδειγμα , μπορεί να χρειαστεί να ενεργοποιήσει μια διαδικασία των Windows καλύτερα αντιμετωπίζεται από ένα αρχείο δέσμης . Ένας τρόπος για να συνδυάσει την επεξεργαστική ισχύ και των δύο τεχνολογιών είναι να περάσουμε τις μεταβλητές , ή μεταπωλητές , από VBScript σε ένα αρχείο δέσμης . Εκτελέστε αυτή την εργασία χρησιμοποιώντας ένα αντικείμενο των Windows WshSell που κατοικούν στο πρόγραμμά σας VBScript . Οδηγίες
Η

1 Ανοίξτε το Notepad και επικολλήστε το ακόλουθο κείμενο σε ένα νέο έγγραφο :

echo % 1

echo % 2

@ παύση

αυτό το κείμενο αρχείο δέσμης δέχεται δύο παραμέτρους : 1 % και 2 % η ηχώ εντολή εμφανίζει εκείνες τις παραμέτρους , όταν οι πίστες αρχείο δέσμης 2

Πιέστε το πλήκτρο " CTRL " και "S " για να ανοίξει . το παράθυρο Αποθήκευση αρχείου και πληκτρολογήστε ένα όνομα για το αρχείο στο " όνομα αρχείου " κουτί κειμένου . Συμπεριλάβετε " . Νυχτερίδα " στο τέλος του ονόματος του αρχείου . Για παράδειγμα , το όνομα του αρχείου " BatFile1 , " τύπος " BatFile1.bat " στο πεδίο "Όνομα αρχείου " κείμενο , στη συνέχεια, κάντε κλικ στο κουμπί "Αποθήκευση". Το παράθυρο Αποθήκευση αρχείου κλείνει και επιστρέφει στο έγγραφο
εικόνων 3

Διαγράψτε το κείμενο του εγγράφου και να το αντικαταστήσετε με τον κώδικα VBScript φαίνεται παρακάτω : .

Δημ. vbShell

Δημ. var1

Δημ. var2

Δημ. batchfile

Set vbShell = CreateObject ( " WScript.Shell " )

quotedVar1 = " " & "" "" & var1 & " " " "

var2 = " Αυτό είναι μεταβλητή 2 "

quotedVar2 = " " & " " "" & var2 & "" " "

batchfile = " xyz.bat "

vbShell.run batchfile & quotedVar1 & quotedVar2

που vbShell = τίποτα

Η εντολή vbShell , φαίνεται στη γραμμή 5 , δημιουργεί ένα αντικείμενο κελύφους . Οι προγραμματιστές χρησιμοποιούν αυτά τα αντικείμενα για να καλέσετε εξωτερικά προγράμματα μέσα από VBScript . Η μεταβλητή var1 κρατά την τιμή που θέλετε να περάσετε στο αρχείο δέσμης . Η μεταβλητή quotedVar1 προσθέτει εισαγωγικά γύρω από τη μεταβλητή . Αυτό εξασφαλίζει ότι οι μεταβλητές με κενά σε αυτά μεταφέρει σωστά στο αρχείο δέσμης . Η μεταβλητή VAR2 περιέχει την τιμή μιας δεύτερης μεταβλητής . Έχει επίσης ένα μεταβλητό quotedVar2 που περιβάλλει τη μεταβλητή με εισαγωγικά . Αντικαταστήστε το " xyz.bat " με το όνομα του αρχείου δέσμης σας . Η εντολή vbShell.run περνά quotedVar1 και quotedVar2 σε αυτό το αρχείο δέσμης και το εκτελεί .
Η

4 Πατήστε το πλήκτρο " CTRL " και " S ", για να ανοίξετε το παράθυρο Αποθήκευση αρχείου και πληκτρολογήστε ένα όνομα για αυτό το αρχείο "Όνομα αρχείου " κουτί κειμένου . Προσάρτηση " . Vbs " στο τέλος του ονόματος και κάντε κλικ στο κουμπί "Αποθήκευση". Σημειωματάριο αποθηκεύει το αρχείο ως ένα πρόγραμμα VBScript .
5

Launch Εξερεύνηση των Windows και εντοπίστε το αρχείο που αποθηκεύσατε το VBScript . Κάντε διπλό κλικ στο αρχείο . Ο κώδικας εκτελείται και περνά τις μεταβλητές στο αρχείο δέσμης . Το αρχείο δέσμης λαμβάνει αυτές τις μεταβλητές και τις εμφανίζει στο παράθυρο εντολών που ανοίγει .
Η
εικόνων