Funkce GetAttr

Důležité :  Tento článek je strojově přeložený – přečtěte si toto upozornění. Anglickou verzi tohoto článku pro referenci najdete tady.

Poznámka : Funkce, metody, objektu nebo vlastnosti popsaných v tomto tématu je vypnutá, když běží služba Microsoft Jet výraz v režimu izolovaného prostoru, který brání hodnocení potenciálně nebezpečných výrazů. Další informace o režimu izolovaného prostoru vyhledejte v nápovědě "režim izolovaného prostoru".

Vrátí hodnotu typu Integer představující atributy souboru, adresáře nebo složky.

Syntaxe

GetAttr ( cesta )

Povinný cestaArgument je Řetězcový výraz, která určuje název souboru. Cesta může obsahovat adresáře nebo složky a jednotky.

Vrátí hodnoty

Hodnota vrácená GetAttr odpovídá součtu následující hodnoty atributu:

Konstanta

Hodnota

Popis

vbNormal

0

Normální.

vbReadOnly

1

Jen pro čtení.

vbHidden

2

Skryté.

vbSystem

4

Systémový soubor. Nedostupné na Macintosh.

vbDirectory

16

Adresáři nebo složce.

vbArchive

32

Soubor se od posledního zálohování změnil. Nedostupné na Macintosh.

vbAlias

64

Zadaný název souboru je alias. K dispozici pouze v systému Macintosh.


Poznámka : Tyto konstanty jsou určeny jazykem Visual Basic for Applications. Názvy lze použít kdekoli v kódu místo správných hodnot.

Poznámky

Poznámka : Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.

Pokud chcete určit, které atributy se nastavují, operátor a provádět Bitové porovnávání hodnoty vrácené tak, že funkce GetAttr a hodnota atributu jednotlivých souborů, které chcete. Pokud je výsledek příliš nula, atributu nastavenou pojmenované souboru. Například vrácenou hodnotu následující výraz a nulový Pokud není nastavena atribut Archiv:

Result = GetAttr(FName) And vbArchive

Pokud je nastaven atribut Archiv, bude vrácena nenulovou hodnotu.

Příklad

Tento příklad používá funkci GetAttr atributy souborů a adresáři nebo složce. V počítačích Macintosh, pouze atributy vbNormal, vbReadOnly, jsou k dispozici 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.

Poznámka : Upozornění ke strojovému překladu: Tento článek přeložil počítačový systém bez zásahu člověka. Společnost Microsoft nabízí tyto strojové překlady proto, aby umožnila uživatelům, kteří nemluví anglicky, získat informace o produktech, službách a technologiích této společnosti. Protože je tento článek strojově přeložený, může obsahovat slovní, syntaktické nebo gramatické chyby.

Rozšiřte své znalosti a dovednosti
Projít školení
Získejte nové funkce jako první
Připojte se k účastníkům programu Office Insiders

Byly tyto informace užitečné?

Děkujeme vám za zpětnou vazbu.

Děkujeme vám za váš názor. Vypadá to, že bude užitečné, když vás spojíme s některým z našich agentů z podpory Office.

×