-
Cómo comparar los atributos de los archivos en VBS
-
Windows utiliza un sistema de archivo de atributos para definir la información acerca de cómo un archivo debe ser manejado por el sistema operativo, como "sólo lectura", "oculto" y "File System". Estos atributos son accesibles a Visual Basic Script como un simple número entero con los valores dispuestos de tal manera cualquier entero dado representa exactamente un arreglo de atributos. Puesto que son simplemente un número entero, atributos de archivo se pueden comparar utilizando sólo el ordinario "si x = y" estructura.
Comenzando con las operaciones
Abra un editor de texto.
La función
Pega el siguiente función VBS en el editor:
CompareAttributes de función (archivo1, archivo2)
dim res
si file1.attributes = file2.attributes luego
res = true
más
res = false
terminara si
Comparar = res
Función finales
Ejemplo
Pega el siguiente para probar la función:
dim FSO, f1, f2
establecer FSO = CreateObject ( "Scripting.FileSystemObject")
establecer f1 = fso.getFile ( "filename")
establecer f2 = fso.getFile ( "anotherFilename")
CompareAttributes (f1, f2)