Turinys

# GetAttr funkcija

Pateikia bitų šabloną, identifikuojantį failo tipą, tomo ar katalogo pavadinimą.

## Sintaksė:

    GetAttr (tekstas eilute)

## Grąžinama reikšmė:

Sveikasis skaičius

## Parametrai:

Tekstas: Bet kuri eilutės išraiška, kuri pagrįsta nedviprasmiška failo specifikacija. Taip pat galite naudoti URL žymėjimą.

Ši funkcija nustato nurodyto failo atributus ir pateikia bitų šabloną, kuris gali padėti nustatyti šiuos failo atributus:

### Klaidos kodai:

5 Neteisingas procedūros iškvietimas

53 failas nerastas

## Reikšmė

Įvardinta konstanta | Reikšmė | Aprašas
--- | --- | ---
ATTR_NORMAL | 0 | Įprasti failai.
ATTR_READONLY | 1 | Tik skaitymui failai.
ATTR_HIDDEN | 2 | Paslėptas failas
ATTR_SYSTEM | 4 | Sisteminis failas
ATTR_VOLUME | 8 | Grąžina tomo pavadinimą
ATTR_DIRECTORY | 16 | Grąžina tik katalogo pavadinimą.
ATTR_ARCHIVE | 32 | Failas buvo pakeistas nuo paskutinės atsarginės kopijos (archyvo bitų).

Jei norite sužinoti, ar nustatytas atributo baitas, naudokite šį užklausos metodą:

## Pavyzdys:

    Sub ExampleSetGetAttr
    On Error GoTo ErrorHandler 'Apibrėžkite klaidų tvarkytuvo tikslą
     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

Paremkite mus!