Napomena: Funkcija, metod, objekat ili vlasništvo opisane u ovoj temi je onemogućeno ako se pokreće Microsoft Jet Expression usluga u okviru "sandbox" režima, što sprečava procenu potencijalno nebezbednih izraza. Više informacija o "sandbox" režimu potražite u okviru pomoći "sandbox režim".
Vraća ceo broj koji predstavlja atribute datoteke, direktorijuma ili fascikle.
Sintaksa
GetAttr ( putanje imena )
Obavezno ime putanjeargument je izraz niske koje navodi ime datoteke. Staza za putanje može da ima direktorijum ili fasciklu i disk jedinicu.
Vraćene vrednosti
Vrednost koju je vratio GetAttr jeste zbir sledećih vrednosti atributa:
Konstanta | Vrednost | Opis |
|---|---|---|
|
Vannormal |
0 |
Ana. |
|
Šta je to |
1 |
Samo za čitanje. |
|
Funkcija Vibsakrivena |
2 |
Krio. |
|
Vibsystem |
4 |
Sistemska datoteka. Nije dostupno na Macintosh računarima. |
|
Mbdirectory |
Posted |
Direktorijum ili fascikla. |
|
Vibarchive |
32 |
Datoteka se promenila od poslednjeg pravljenja rezervne kopije. Nije dostupno na Macintosh računarima. |
|
Vibalias |
64 |
Navedeno ime datoteke je pseudonim. Dostupno samo na Macintosh računarima. |
Napomena: Ove konstante određuje Visual Basic for Applications. Imena se mogu koristiti bilo gde u kodu umesto stvarnih vrednosti.
Napomene
Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
Da biste utvrdili koje su atribute podešene, koristite operator i koristite da biste obavili poređenje na nivou bita vrednosti koje je dala funkcija GetAttr i vrednost atributa pojedinačne datoteke koji želite. Ako ishod nije nula, taj atribut je podešen za imenovanu datoteku. Na primer, povratna vrednost sledećeg i izraza je nula ako atribut arhiva nije postavljen:
Result = GetAttr(FName) And vbArchive
Vrednost koja nije nula se daje ako je podešen atribut arhiviranja.
Primer
Ovaj primer koristi funkciju GetAttr za utvrđivanje atributa datoteke i direktorijuma ili fascikle. Na Macintosh računarima, samo konstante Bbnormal, v-Doni, Bbsakriveni i Vibalias dostupni su.
Dim MyAttr
' Assume file TESTFILE has hidden attribute set.
MyAttr = GetAttr("TESTFILE") ' Returns 2.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And vbHidden
' Assume file TESTFILE has hidden and
' read-only attributes set.
MyAttr = GetAttr("TESTFILE") ' Returns 3.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And (vbHidden + vbReadOnly)
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("MYDIR") ' Returns 16.
