November 19
Windows utilizza un sistema di file di attributi per definire le informazioni su come un file dovrebbe essere gestita dal sistema operativo, come ad esempio "Sola lettura", "Nascosto" e "File System". Questi attributi sono accessibili a Visual Basic Script come semplice intero con valori disposti in modo qualsiasi numero intero rappresenta esattamente un arrangiamento di attributi. Dal momento che sono solo un numero intero, gli attributi dei file possono essere confrontati utilizzando solo il normale "se x = y" struttura.
Aprire un editor di testo.
Incollare il seguente funzione VBS nell'editor:
CompareAttributes funzione (file1, file2)
dim res
se file1.attributes = file2.attributes poi
res = true
altro
res = false
finisci se
Confronto = res
Funzione fine
Incollare il seguente per testare la funzione:
dim UST, f1, f2
set fso = CreateObject ( "Scripting.FileSystemObject")
set f1 = fso.getFile ( "nomefile")
set f2 = fso.getFile ( "anotherFilename")
CompareAttributes (f1, f2)