Funkce FileAttr

Poznámka: Snažíme se pro vás co nejrychleji zajistit aktuální obsah nápovědy ve vašem jazyce. Tato stránka byla přeložena automaticky a může obsahovat gramatické chyby nebo nepřesnosti. Naším cílem je to, aby pro vás byl její obsah užitečný. Mohli byste nám prosím dát ve spodní části této stránky vědět, jestli vám informace v článku pomohly? Pokud byste se rádi podívali na jeho anglickou verzi, najdete ji 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 Long představující režim souboru u souborů otevřených pomocí příkazu Otevřít .

Syntaxe

FileAttr ( číslo_souboru ; typ_vrácených_informací )

Syntaxe funkce FileAttr obsahuje následující argumenty:

Argument

Popis

číslo_souboru

Povinné. Celé číslo. Libovolný platný Číslo souboru.

typ_vrácených_informací

Povinné. Celé číslo. Číslo označující druh informací se vrátíte. Zadejte 1, vrátí hodnotu označující režim souboru. V sítě 16bitová zadejte 2 pro načtení popisovače souborů operační systém. typ_vrácených_informací 2 není podporováno v 32bitových systémů a způsobí chybu.

Vrátí hodnoty

1 po typ_vrácených_informacíArgument označují následující návratové hodnoty režim přístupu souboru:

Režim:

Hodnota

Zadání vstupních hodnot

1

Výstup

2

Náhodné

4

Přidávací

8

Binary

32

Příklad

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.

Tento příklad používá funkci FileAttr vrátit soubor režimu a soubor úchyt otevřeného souboru. Úchyt soubor je vrácena pouze v systémech 16bitová; jako druhý argument s hodnotou 2 v systémech 32bitovou verzi, dojde k chybě.

Dim FileNum, Mode, Handle
FileNum = 1 ' Assign file number.
Open "TESTFILE" For Append As FileNum ' Open file.
Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2) ' Returns file handle.
Close FileNum ' Close file.
Rozšiřte své dovednosti s Office
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.

×