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 sandboxu, což brání vyhodnocení potenciálně nebezpečných výrazů. Další informace o režimu sandboxu najdete v nápovědě pro "režim sandboxu".
Vrátí long představující režim souborů pro soubory otevřené pomocí příkazu Open .
Syntaxe
FileAttr(filenumber;returntype)
Syntaxe funkce FileAttr má tyto argumenty:
| Argument | Popis |
|---|---|
| filenumber | Povinný argument. Celé číslo. Libovolné platné číslo souboru. |
| Returntype | Povinný argument. Celé číslo. Číslo označující typ informací, které se mají vrátit. Zadáním hodnoty 1 vrátíte hodnotu označující režim souboru. 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. |
Návratové hodnoty
Pokud je argument returntype1, následující návratové hodnoty označují režim přístupu k souborům:
| 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.
Tento příklad používá funkci FileAttr k vrácení režimu souboru a popisovače souboru otevřeného souboru. Popisovač souboru je vrácen pouze v 16bitových systémech; u 32bitových systémů 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.