Windows verwendet ein System der Dateiattribute , um Informationen darüber, wie eine Datei sollte durch das Betriebssystem , z. B. " Nur Lesen ", " Versteckt " und " System File behandelt werden definieren " . Diese Attribute sind für Visual Basic Script als einfache ganze Zahl mit den Werten in der Weise eine gegebene ganze Zahl repräsentiert genau eine Anordnung von Attributen angeordnet. Da sie nur eine ganze Zahl sind, können Dateiattribute verglichen nur mit der gewöhnlichen , "wenn x = y "-Struktur . Getting Ready

Öffnen Sie einen Texteditor
Die Funktion

Fügen Sie den folgenden VBS-Funktion in den Editor : .
< P > Funktion CompareAttributes ( Datei1 , file2 )

dim res

wenn file1.attributes = file2.attributes dann

res = true

sonst

res = false end if

vergleichen = res

End Function
Beispiel

Fügen Sie den folgenden , um die Funktion zu testen :

dim fso , f1, f2

gesetzt fso = CreateObject (" Scripting.FileSystemObject " )

Set f1 = fso . getFile ( "Dateiname" )

Set f2 = fso.getFile ( " anotherFilename " )

CompareAttributes (f1 , f2)