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 Long predstavujúcu režim súboru pre súbory otvorené pomocou príkazu Open .
Syntax
FileAttr ( filenumber , returntype )
Syntax funkcie FileAttr obsahuje tieto argumenty:
|
Argument |
Popis |
|
číslo súboru |
Povinný argument. Hodnota typu Integer. Akékoľvek platné číslo súboru. |
|
typ návratu |
Povinný argument. Hodnota typu Integer. Číslo označujúce typ informácií, ktoré sa majú vrátiť. Ak chcete vrátiť hodnotu označujúcu režim súboru, zadajte hodnotu 1. Len v 16-bitových systémoch zadajte hodnotu 2, ak chcete načítať rukoväť súboru operačného systému. returntype 2 nie je podporovaný v 32-bitových systémoch a spôsobuje chybu. |
Vrátené hodnoty
Keď jeargumentreturntype 1, nasledujúce vrátené hodnoty označujú režim prístupu k súboru:
|
Modus |
Hodnota |
|
Vstup |
1 |
|
Výstup |
2 |
|
Náhodné |
4 |
|
pripájací dotaz, |
8 |
|
Binárne |
32 |
Príklad
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.
V tomto príklade je funkcia FileAttr použitá na vrátenie režimu súboru a popisovača súboru otvoreného súboru. Popisovač súboru sa vráti iba v 16-bitových systémoch. v 32-bitových systémoch, prenesenie 2 ako druhého argumentu vygeneruje 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.
