pulsante destro del mouse in Esplora risorse di Windows , selezionare " Nuovo " dal menu a comparsa e fare clic sulla voce di menu " Documento di testo " per creare un file di testo .
2
Aprire il file appena creato per la modifica. Questo sarà il contenitore di tutto il codice VBScript che si scrive. In ogni gradino sotto , potrete vedere diverse righe di codice con la descrizione inglese semplice di quello che fanno . Quando metti tutte queste righe di codice insieme , si finisce con uno script per creare un file di testo .
3
Creare una variabile per l' oggetto del file system e creare un'istanza di esso ( impostarlo ad una nuova istanza dell'oggetto ) . In VBScript creare le variabili di " dimensionamento " con il comando " Dim " . Variabili complesse ( quelli che non sono stringhe, interi o booleani ) devono essere istanziati prima di poterli utilizzare
Copia il seguente codice nel file di testo : . Dim objFSO ' Come FileSystemObjectSet objFSO = CreateObject ( " Scripting . FileSystemObject " ) economici 4
Aggiungi una variabile stringa per il percorso della directory in cui si desidera inserire il file e metterlo nella posizione desiderata .
Copia il seguente codice nel testo File : Dim strDirectory ' Come StringstrDirectory = " C : \\ NewDirectory "
5
Assicurati che la cartella directory esiste . Se la directory non esiste , quindi creare utilizzando l' oggetto del file system
Copia il seguente codice nel file di testo : . Dim objDirectory ' Come Objectif objFSO.FolderExists ( strDirectory ) ThenSet objDirectory = objFSO.GetFolder ( strDirectory ) ElseSet objDirectory = objFSO.CreateFolder ( strDirectory ) End If
6
Fai una variabile stringa per il nome del file e impostarlo su un valore appropriato .
Copia il seguente codice nel tuo file di testo : Dim strFile ' Come StringstrFile = " NewFile.txt "
7
creare una variabile per il file di testo e creare un'istanza. Il metodo CreateTextFile ha un parametro opzionale per sovrascrivere il file che già esiste
Copia il seguente codice nel file di testo : . Dim objTextFile ' Come ObjectDim blnOverwrite ' Come BooleanblnOverwrite = TrueSet objTextFile = objFSO.CreateTextFile ( strDirectory & " \\ " & strFile , blnOverwrite )
8
scrivere dati sul file appena creato con il codice qui sotto . Ci sono due metodi per la scrittura di file , " Scrivi " e " WriteLine ". Quest'ultimo metodo include automaticamente un carattere di nuova riga per voi , mentre gli ex appena vengono aggiunti nuovi dati ciò che è già presente
Copia il seguente codice nel file di testo : . ObjTextFile.Write ( " Questo è" ) objTextFile . WriteLine ( " un nuovo file di testo" ) ' il risultato è la stringa " Questo è un nuovo file di testo "
9
chiudere il file con il codice e rilasciare correttamente tutti gli oggetti .
copiare il codice riportato di seguito nel file di testo : objTextFile.CloseSet objTextFile = NothingSet objDirectory = NothingSet objFSO = Nothing
10
Salva tutto il codice creato nei passaggi precedenti nel file di testo all'inizio e quindi chiudere il file . Rinominare il file con " . Vbs " invece di " . Txt" facendo clic destro sul file e selezionare "Rinomina" dal menu pop - up . Fare doppio clic sul file per eseguire il codice .
Programmazione © www.354353.com