Confirmar que existe un archivo es fácil con VBScript.
Credito de imagen: Ablestock.com/AbleStock.com/Getty Images
Al escribir código VBScript, es posible que un programador deba confirmar que existe un archivo antes de realizar una acción o invocar una función. Esto se puede lograr accediendo a Windows Script Host con VBScript y haciendo uso de FileSystemObject. La mejor manera de aprender esta técnica de programación es siguiendo un ejemplo paso a paso. Esta es una buena práctica para un programador principiante de VBScript.
Paso 1
Abra el Bloc de notas. Haz clic en el menú "Inicio" de Windows y escribe "bloc de notas" en el cuadro de búsqueda. Seleccione Bloc de notas en los resultados de la búsqueda.
Video del día
Paso 2
Crea un nuevo archivo en el Bloc de notas. Escriba algunas letras al azar en el archivo y guárdelo como "C: \ Temp \ test.txt". Este archivo se utilizará para demostrar el código VBScript.
Paso 3
Cree otro documento nuevo en el Bloc de notas y guarde este archivo como "C: \ Temp \ FileCheck.vbs". Agregar una extensión ".vbs" a un archivo de texto crea un archivo VBScript ejecutable en una computadora con Windows.
Paso 4
Copie y pegue el siguiente código en su documento de Bloc de notas:
Opción explícita
'Establecer dimensión DIM fso
'Establecer conjunto de objetos fso = CreateObject ("Scripting. FileSystemObject ")
'Crear condición si (fso. FileExists ("C: \ Temp \ test.txt")) Luego 'Alerta al usuario WScript. Echo ("¡El archivo existe!") WScript. Salir () Else 'Alerta al usuario WScript. Echo ("¡El archivo no existe!") End If
'Salga de Script WScript. Dejar()
Paso 5
Guarde el archivo VBScript que acaba de crear y salga del Bloc de notas.
Paso 6
Busque la carpeta que contiene su archivo VBScript y haga doble clic en "FileCheck.vbs". Debería aparecer un cuadro de mensaje confirmando: "¡El archivo existe!" Seleccione "Aceptar" para cerrar el cuadro de mensaje.
Paso 7
Cambie el nombre o elimine el archivo "C: \ Temp \ test.txt" que creó en el Paso 1; luego, haga doble clic en el script "FileCheck.vbs" nuevamente. Esta vez, el archivo especificado no existe y verá un mensaje que proclama: "El archivo no existe! "La declaración If-Then-Else en su código VBScript está realizando la verificación y lo alerta sobre el resultados. Seleccione "Aceptar" para cerrar el cuadro de mensaje.
Advertencia
Cuando trabaje con archivos VBSscript, al hacer doble clic en estos archivos se iniciará el código VBScript. Para editar un archivo con una extensión .vbs, haga clic derecho en el archivo y seleccione "Editar" en el menú contextual.
