Cómo buscar un archivo de texto con VBScript

Hay momentos en que un programador pueda necesitar para buscar y leer un archivo de texto cuando se utiliza VBScript. Es posible realizar esta tarea mediante el acceso a Windows Script Host, a través de VBScript. Se trata además de tomar ventaja de la utilización y FileSystemObject.

Instrucciones

1 Crear un archivo de texto con el siguiente nombre y la ubicación:

"C: \ Temp \ TextToRead.txt"

2 Abrir 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 "Bloc de notas".

3 Copiar y pegar el siguiente en el Bloc de notas:

Option Explicit

Const conForReading = 1

'Declarar variables

Dim objFSO, objReadFile, contenidos

'Set Objetos

Establecer objFSO = CreateObject ( "Scripting.FileSystemObject")

Establecer objReadFile = objFSO.OpenTextFile ( "C: \ Temp \ TextToRead.txt", 1, False)

'Leer el contenido del archivo

contenidos = objReadFile.ReadAll

'Cerrar archivo

objReadFile.close

'Mostrar resultados

contenidos Wscript.Echo

"objetos de limpieza

Establecer objFSO = Nada

Establecer objReadFile = Nada

"Salir de la escritura

WScript.Quit ()

Haga clic en "Archivo" y selecciona "Guardar" en el Bloc de notas y salir del programa.

4 Ejecutar el script haciendo doble clic sobre el archivo ReadTextFile.vbs VBScript.

Haga clic en el botón "OK" en el mensaje "Windows Script Host". Ahora puede buscar y leer un archivo de texto con una VBSript.