IBM Lotus Symphony


SetAttr-Anweisung [Laufzeit]

Legt die Attributinformationen für eine angegebene Datei fest.

Syntax:

SetAttr Dateiname As String, Attribut As Integer

Parameter:

Dateiname: Name der Datei, einschließlich Pfad, deren Attribute Sie testen möchten. Wenn Sie keinen Pfad eingeben, sucht SetAttr im aktuellen Verzeichnis nach der Datei. Sie können auch die URL-Schreibweise verwenden.

Attribut: Bitmuster, die die festzulegenden oder zu löschenden Attribute definieren:

Wert

0 : Normale Dateien.

1 : Schreibgeschützte Dateien.

32 : Datei wurde seit der letzten Sicherung geändert (Archivierungsbit).

Sie können mehrere Attribute festlegen, indem Sie die entsprechenden Werte mit einer logischen ODER-Anweisung kombinieren.

Fehlercodes

5 Invalid procedure call

53 File not found

70 Permission denied

Beispiel:

Sub ExampleSetGetAttr

On Error Goto ErrorHandler REM Ziel für Fehlerbehandlung definieren

If Dir("C:\test",16)="" Then MkDir "C:\test"

If Dir("C:\test\autoexec.sav")="" THEN Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav"

SetAttr "c:\test\autoexec.sav" ,0

Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav"

SetAttr "c:\test\autoexec.sav" ,1

print GetAttr( "c:\test\autoexec.sav" )

end

ErrorHandler:

Print Error

end

end sub


Produktfeedback | Zusätzliche Dokumentation | Marken