1
 Crear un archivo de texto con el siguiente nombre y ubicación : 
 
 "C: \\ Temp \\ TextToRead.txt " 
 2 
 abierto y ejecutar el programa Bloc de notas. Haga clic en el botón "Inicio " en el escritorio de Windows, haga clic en " Todos los programas", luego seleccione " Accesorios " y haga clic en 
 3 
 Copia y pega lo siguiente en el Bloc de notas " Bloc de notas ". : 
 
 Option Explicit Const 
 
 conForReading = 1 
 
 'Declara las variables 
 
 Dim objFSO , objReadFile , contenido 
 
 ' Juego de objetos 
 
 Set objFSO = CreateObject ( " Scripting.FileSystemObject " ) 
 
 Set objReadFile = objFSO.OpenTextFile ("C: \\ temp \\ TextToRead.txt " , 1 , False ) 
 
 ' Leer el contenido del archivo 
 
 contenido = objReadFile.ReadAll 
 
 ' Cerrar archivo 
 
 objReadFile.close 
 
 ' Mostrar resultados 
 
 Wscript.Echo contenidos 
 
 ' objetos de limpieza 
 
 objFSO Set = Nothing 
 
 objReadFile Set = Nothing 
 
 ' Quit guión 
 
 WScript.Quit () 
 
 Haga clic en " archivo" y seleccione " Guardar" en el Bloc de notas y salir del programa . 
 4 
 Ejecute la secuencia de comandos , haga doble clic en el archivo VBScript ReadTextFile.vbs . 
 
 clic en el botón "OK " en el " Windows Script Host " del sistema . Ahora puede buscar y leer un archivo de texto con un VBSript . 
 
 
          
