Spis treści

# Instrukcja SetAttr

Ustawia informację o atrybutach określonego pliku.

### Składnia:

    SetAttr PathName As String, Attributes As Integer

### Parametry:

FileName: nazwa pliku wraz ze ścieżką, którego atrybuty chcesz przetestować. Jeśli nie wpiszesz ścieżki, SetAttr wyszuka plik w bieżącym katalogu. Możesz także użyć notacji adresu URL.

Attributes: wzorzec bitowy definiujący atrybuty, które chcesz ustawić lub wyczyścić:

Nazwana stała | Wartość | Definicja
--- | --- | ---
ATTR_NORMAL | 0 | Pliki normalne.
ATTR_READONLY | 1 | Pliki tylko do odczytu.
ATTR_HIDDEN | 2 | Plik ukryty

Funkcja pozwala na łączenie różnych atrybutów przez połączenie odpowiednich wartości za pomocą instrukcji logicznej OR.

### Kody błędów:

5 Nieprawidłowe wywołanie procedury

53 Plik nie został odnaleziony

70 Odmowa uprawnień

### Przykład:

    Sub ExampleSetGetAttr
     On Error Goto ErrorHandler ' Zdefiniowanie celu obsługi błędów
     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