Contenido
Al escribir un programa en VBScript, es posible que desee crear su código para que pueda abrir y leer el contenido de un archivo de texto en el disco duro del usuario. Esto se puede hacer utilizando VBScript para acceder a Windows Script Host y utilizando FileSystemObject. La mejor manera de aprender esta técnica de programación es con un ejemplo real.
instrucciones
-
Abra el Bloc de notas y cree un archivo de texto. Escriba el siguiente mensaje:
"Si recibe este mensaje, habrá completado con éxito esta tarea de programación."
-
Guarde el archivo que acaba de crear en la carpeta "C: Temp" en su disco duro y denomínelo como "TextToRead.txt".
-
Cree un nuevo documento de texto en el Bloc de notas.
-
Copie y pegue el siguiente código en el archivo que creó 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
Cerrar archivo objReadFile.close
Mostrar resultados wscript.echo contents
'Cleanup objects Set objFSO = Nothing Set objReadFile = Nothing
'Quit script WScript.Quit ()
-
Haga clic en "Archivo" en la barra de herramientas del Bloc de notas y seleccione "Guardar" en el menú contextual. Guarde el archivo con el código VBScript como "C: Temp ReadTextFile.vbs" y, a continuación, cierre el Bloc de notas.
-
Abra VBScript navegando en la carpeta "C: Temp" del disco duro y haga doble clic en el archivo "ReadTextFile.vbs". El mensaje escrito en el archivo de texto del paso 1 aparecerá en una pequeña ventana, lo que confirma que VBScript se ha abierto y se ha leído con éxito. Haga clic en "Aceptar."
consejos
- Al ver o editar un archivo de VBScript con una extensión ".vbs", haga clic con el botón derecho del ratón en el archivo y seleccione la opción "Editar"; presionar el botón izquierdo del ratón sobre el archivo hará que se abra.