Introducción a VB Script: una guía para principiantes: parte 2: trabajar con archivos de (4 / 13 paso)

Paso 4: explicaciones en el medio

Ahora que ya tenemos nuestras variables dimensiones todo lo que tenemos que hacer es recordar a esa variable específica cada vez. Esto no sólo reduce la cantidad de mecanografiar hacer sino que también crea menos errores debido a faltas de ortografía.

Ahora técnicamente todo lo que tienes que hacer es el siguiente código y ya terminamos

' establecer el archivo para agregar
Set objTextFile = objFiSyOb.OpenTextFile (strDir y strFile, ForAppending, True)
' escribir la nueva línea en el fichero
objTextFile.WriteLine ("ordenador cerrada el" & fecha & "en" & hora)
' cerrar el archivo
objTextFile.Close
' hacer un pop up
Wscript.Echo ("ordenador cerrada el" & fecha & "en" & hora)
' abrir el archivo en IE
Set objShell = CreateObject("WScript.Shell")
objShell.run ("Explorer" & "" & strDir & "\shutdown_catcher.txt")

El problema es no tendrá ninguna corrección de error, y cualquier error simple como archivo no existente o variable ya asignada estrellará la secuencia de comandos.