VBScript ist eine leichte Programmiersprache, die von Microsoft entwickelt wurde. Es ist sehr nützlich zu wissen, wie die Programmierung in VBScript , da seine Dolmetscher für die Sprache in allen Microsoft-Betriebssystemen eingebettet sind. Keine besonderen Programmierwerkzeuge benötigt zu laufen oder Code schreiben in VBScript . Diese Sprache kann Client-Seite verwendet werden oder hinzugefügt, um Web-Seiten. Anleitung
1
rechten Maustaste in Windows Explorer , wählen Sie " Neu" aus dem Popup-Menü und klicken dann auf die "Text -Dokument" Menüpunkt , um eine Textdatei zu erstellen.
< Br > 2
Öffnen Sie die neu erstellte Datei zur Bearbeitung. Dies wird der Container für alle der VBScript-Code Ihnen zu schreiben . In jedem Schritt unten , werden Sie mehrere Zeilen Code mit einem einfachen englischen Beschreibung dessen, was sie tun, zu sehen. Wenn Sie all diese Zeilen Code zusammen, beenden Sie mit einem Skript , um eine Textdatei zu erstellen.
3
Erstellen Sie eine Variable für das Dateisystem -Objekt und instanziieren (stellen Sie ihn auf eine neue Instanz des Objekts) . In VBScript erstellen Sie Variablen " Dimensionierung " sie mit dem " Dim "-Befehl. Komplexe Variablen ( diejenigen, die nicht sind Strings, Integer oder Boolean ) müssen instanziiert , bevor Sie sie verwenden können
Kopieren Sie den folgenden Code in Ihre Textdatei : . Dim objFSO ' Wie FileSystemObjectSet objFSO = CreateObject ( "Scripting . FileSystemObject " )
4
Fügen Sie eine String-Variable für den Verzeichnispfad, in dem Sie die Datei ablegen und legen Sie es an die gewünschte Position wollen .
Kopieren Sie den folgenden Code in Ihren Text Datei : Dim strDirectory ' Wie StringstrDirectory = "C : \\ NewDirectory "
5
sicher , dass das Verzeichnis Ordner existiert Stellen . Wenn das Verzeichnis nicht vorhanden ist, dann schaffen Sie es mit der Dateisystem -Objekt
Kopieren Sie den folgenden Code in Ihren Text -Datei : . Dim objDirectory ' Wie objectif objFSO.FolderExists ( strDirectory ) ThenSet objDirectory = objFSO.GetFolder ( strDirectory ) ElseSet objDirectory = objFSO.CreateFolder ( strDirectory ) End If
6
einen String-Variable für den Dateinamen und legen Sie sie auf einen geeigneten Wert .
Kopieren Sie den folgenden Code auf Ihrer Textdatei : Dim strFile ' Wie StringstrFile = " NewFile.txt "
7
eine Variable für den Text-Datei erstellen und instanziieren . Die CreateTextFile Methode hat einen optionalen Parameter zum Überschreiben der Datei, die es bereits vorhanden
Kopieren Sie den folgenden Code in Ihre Textdatei : . Dim objTextFile ' Wie ObjectDim blnOverwrite ' Wie BooleanblnOverwrite = TrueSet objTextFile = objFSO.CreateTextFile ( strDirectory & "\\" & strFile , blnOverwrite )
8
schreiben von Daten auf die neu erstellte Datei mit dem folgenden Code . Es gibt zwei Methoden zum Schreiben in Dateien , "Schreiben" und " WriteLine ". Die letztere Methode beinhaltet automatisch eine neue Zeile Zeichen für Sie , während die ehemaligen gerade hängt Daten an , was bereits vorhanden ist
Kopieren Sie den folgenden Code in Ihre Textdatei . ObjTextFile.Write ("Dies ist " ) objTextFile . WriteLine ( "eine neue Textdatei ") ' Dies führt in der Zeichenfolge " Dies ist eine neue Textdatei "
9
Schließen Sie die Datei mit Code und richtig lösen alle Objekte .
Kopieren Sie den folgenden Code in Ihre Textdatei : objTextFile.CloseSet objTextFile = NothingSet objDirectory = NothingSet objFSO = Nothing
10
Save all der Code, den Sie in den vorherigen Schritten in die Textdatei erstellt am Anfang und schließen Sie die Datei . Benennen Sie die Datei mit " . Vbs " anstelle von " . Txt" mit der rechten Maustaste auf die Datei und wählen Sie " Umbenennen" aus dem Popup-Menü . Auf die Datei doppelklicken, um den Code auszuführen .
