Creare un file di testo utilizzando il nome e la posizione seguente :
"C : \\ Temp \\ TextToRead.txt "
2
aperto e eseguire il programma blocco note . Fare clic sul pulsante "Start" sul desktop di Windows , fare clic su " Tutti i programmi ", quindi selezionare " Accessori " e clicca su
3
copiare e incollare il seguente nel blocco note "Notepad ". :
Option Explicit Const
conForReading = 1
'Dichiara le variabili
Dim objFSO , objReadFile , contenuti
' Set oggetti
objFSO = CreateObject ( " Scripting.FileSystemObject " ) per
objReadFile = objFSO.OpenTextFile ( " C : \\ Temp \\ TextToRead.txt " , 1 , False ) per
' Leggi il contenuto dei file
contenuto = objReadFile.ReadAll
'Chiudi file di
objReadFile.close
' Mostra i risultati
WScript.Echo contenuti
' oggetti Cleanup
objFSO = Nothing Set
objReadFile = Nothing
' Quit sceneggiatura
WScript.Quit ( )
Fare clic su " File " e selezionare "Salva" in Blocco note e uscire dal programma .
4
Eseguire lo script facendo doppio clic sul file VBScript ReadTextFile.vbs .
Fare clic sul pulsante " OK " in " Windows Script Host " chiederà . Ora è possibile cercare e leggere un file di testo con un VBSript .
Domanda © www.354353.com