SetAttr Statement

Configura la información d'atributu d'un ficheru especificáu.

Sintaxis:


SetAttr NomeFicheru As String, Atributu As Integer

Parámetros:

NomeFicheru: Nome del ficheru, incluyida la ruta d'accesu, que los sos atributos deseyar comprobar. Si nun s'escribe nenguna ruta d'accesu, SetAttr busca el ficheru nel directoriu actual. Tamién pue usase la notación URL.

Atributu: Patrón de bits que define los atributos que se deseya activar o desactivar:

Valor

Named constant

Valor

Definición

ATTR_NORMAL

0

Ficheros normales.

ATTR_READONLY

1

Ficheros namái de llectura.

ATTR_HIDDEN

2

Ficheru anubríu


Pue establecer dellos atributos combinando los valores respectivos con una instrucción OR lóxica.

Error codes:

5 Llamada a procedimientu non válida

53 Ficheru non atopáu

70 Accesu refugáu

Exemplu:


Sub ExampleSetGetAttr
 On Fallu Goto RemanadorError ' Define destín pal xestor de fallos
 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

Please support us!