Funkcia GetAttr

Poznámka : Funkcia, metóda, objekt alebo vlastnosť, ktoré sú popísané v tejto téme, sú vypnuté, ak je služba Microsoft Jet Expression Service spustená v režime karantény, ktorý zabraňuje vo vyhodnocovaní možných nebezpečných výrazov. Ďalšie informácie o režime karantény nájdete vyhľadaním výrazu „režim karantény“ v Pomocníkovi.

Vráti hodnotu typu Integer, ktorá zastupuje atribúty súboru, adresára alebo priečinka.

Syntax

GetAttr ( názovcesty )

Povinný argument názovcestyargument je reťazcový výraz, ktorý určuje názov súboru. Argument názovcesty môže zahŕňať adresár alebo priečinok a jednotku.

Vrátené hodnoty

Hodnota vrátená funkciou GetAttr je súčtom nasledujúcich hodnôt atribútov:

Konštanta

Hodnota

Popis

vbNormal

0

Normálny.

vbReadOnly

1

Iba na čítanie.

vbHidden

2

Skrytý.

vbSystem

4

Systémový súbor. Nie je k dispozícii v počítačoch Macintosh.

vbDirectory

16

Adresár alebo priečinok.

vbArchive

32

Súbor sa od posledného zálohovania zmenil. Nie je k dispozícii v počítačoch Macintosh.

vbAlias

64

Zadaný názov súboru je alias. Je k dispozícii len v počítačoch Macintosh.


Poznámka : Tieto konštanty sú zadané v jazyku Visual Basic for Applications. Názvy možno použiť kdekoľvek v kóde namiesto skutočných hodnôt.

Poznámky

Poznámka : Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.

Ak chcete zistiť, ktoré atribúty sú nastavené, s použitím operátora And vykonajte porovnanie po bitoch hodnoty vrátenej funkciou GetAttr a hodnoty požadovaného atribútu súboru. Ak výsledkom nie je nula, daný atribút sa nastaví pre pomenovaný súbor. Napríklad pri nasledujúcom výraze And sa vráti hodnota nula, ak nie je nastavený atribút Archive:

Result = GetAttr(FName) And vbArchive

Ak je atribút Archive nastavený, vráti sa nenulová hodnota.

Príklad

V tomto príklade je funkcia GetAttr použitá na určenie atribútov súboru a adresára alebo priečinka. V počítači Macintosh sú k dispozícii len konštanty vbNormal, vbReadOnly, vbHidden a vbAlias.

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.
Rozšírte svoje zručnosti
Preskúmať školenie
Buďte medzi prvými, ktorí získajú nové funkcie
Pridajte sa k insiderom pre Office

Boli tieto informácie užitočné?

Ďakujeme za vaše pripomienky!

Ďakujeme vám za pripomienky. Pravdepodobne vám pomôže, ak vás spojíme s pracovníkom podpory pre Office.

×