Instructie SetAttr

Stelt de attribuutinformatie voor een gespecificeerd bestand in.

Syntaxis:


SetAttr PathName As String, Attributes As Integer

Parameters:

FileName: naam van het bestand, inclusief het pad, waarvan u de kenmerken wilt testen. Als u geen pad invoert, zoekt SetAttr naar het bestand in de huidige map. U kunt ook de URL-notatie gebruiken.

Attributes: Bitpatroon dat de attributen definieert die u wilt instellen of wissen:

Benoemde constante	Waarde	Definitie
ATTR_NORMAL	0	Normale bestanden.
ATTR_READONLY	1	Alleen-lezen bestanden.
ATTR_HIDDEN	2	Verborgen bestand

U kunt meerdere attributen instellen door de respectieve waarden met een logische OF-instructie samen te voegen.

Foutcodes:

5 Ongeldige aanroep van procedure

53 Bestand niet gevonden

70 Toegang geweigerd

Voorbeeld:


Sub ExampleSetGetAttr
 On Error Goto ErrorHandler ' Definieer doel voor foutafhandeling
 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" , ATTR_READONLY
 Print GetAttr( "c:\test\autoexec.sav" )
 End
ErrorHandler:
 Print Error
 End
End Sub