Cómo leer el contenido de un archivo de texto con VBScript

Utiliza VBScript para abrir y leer un archivo de texto.
Por contributor

Paso 1

Ejecuta el Bloc de notas y crea un archivo de texto. Escribe el siguiente mensaje en el archivo de texto:

Si recibes este mensaje, habrás completado con éxito esta programación de tareas.


Paso 2

Guarda el archivo que acabas de crear en la carpeta "C:\Temp" en tu disco duro y colócale el nombre "TextToRead.txt".


Paso 3

Crea un segundo documento nuevo de texto en el Bloc de notas.


Paso 4

Copia y pega el siguiente código en el archivo que creaste en el paso anterior:

Option Explicit

Const conForReading = 1

'Declare variables Dim objFSO, objReadFile, contents

'Set Objects Set objFSO = CreateObject("Scripting.FileSystemObject") Set objReadFile = objFSO.OpenTextFile("C:\Temp\TextToRead.txt", 1, False)

'Read file contents contents = objReadFile.ReadAll

'Close file objReadFile.close

'Display results wscript.echo contents

'Cleanup objects Set objFSO = Nothing Set objReadFile = Nothing

'Quit script WScript.Quit()


Paso 5

Haz clic en "Archivo" en la barra de herramientas del Bloc de notas y selecciona "Guardar" en el menú contextual. Guarda el archivo con tu código VBScript como "C:\Temp\ReadTextFile.vbs" y luego sal del Bloc de notas.


Paso 6

Ejecuta tu VBScript accediendo a la carpeta "C:\Temp" en tu disco duro y haz doble clic en el archivo "ReadTextFile.vbs". El mensaje que escribiste en el archivo de texto en el paso 1 aparecerá en una pequeña ventana emergente, lo que confirma que tu programa de VBScript ha logrado abrir y leer el archivo. Haz clic en "Aceptar".