Poznámka
Funkce, metoda, objekt nebo vlastnost popsané v tomto tématu jsou zakázány, pokud je služba Microsoft Jet Expression Service spuštěna v režimu izolovaného prostoru (sandbox), který znemožňuje vyhodnocení potenciálně nebezpečných výrazů. Další informace o režimu izolovaného prostoru vyhledáte zadáním dotazu "režim izolovaného prostoru" v nápovědě.
Vrátí hodnotu typu Long představující režim souboru pro soubory otevřené pomocí příkazu Open .
Syntaxe
FileAttr(číslosouboru;vrátittyp)
Syntaxe funkce FileAttr obsahuje tyto argumenty:
| Argument | Popis |
|---|---|
| FileNumber | Povinný argument. Celé číslo. Libovolné platné číslo souboru. |
| Vrácený typ | Povinný argument. Celé číslo. Číslo určující typ informace, která se má vrátit. Pokud chcete vrátit hodnotu označující režim souboru, zadejte hodnotu 1. Pouze v 16bitových systémech zadejte hodnotu 2 pro načtení popisovače souboru operačního systému. ReturnType 2 není podporován v 32bitových systémech a způsobuje chybu. |
Vrácené hodnoty
Pokud je argument returntype1, následující návratové hodnoty označují režim přístupu k souboru:
| Režim | Hodnota |
|---|---|
| Vstup | 1 |
| Výstup | 2 |
| Náhodné | 4 |
| Přidávací | 8 |
| Binární | 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.
V tomto příkladu se funkce FileAttr používá k vrácení souborového režimu a popisovače otevřeného souboru. Popisovač souboru se vrací jenom v 16bitových systémech. V 32bitových systémech vygeneruje předání hodnoty 2 jako druhého argumentu chybu.
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.