FileAttr függvény

Megjegyzés: A témakörben ismertetett függvény, metódus, objektum vagy tulajdonság le van tiltva, ha a Microsoft Jet Expression Service védőfalas üzemmódban fut, mivel ez megakadályozza az esetleg nem biztonságos kifejezések kiszűrését. A védőfalas üzemmódról a súgóban a „védőfalas üzemmód” kifejezésre keresve talál további információt.

Az Open utasítással megnyitott fájlok fájlmódját képviselő Hosszú értéket ad eredményül.

Szintaxis

FileAttr ( filenumber , returntype )

A FileAttr függvény szintaxisa az alábbi argumentumokat foglalja foglalja el:

argumentumok

Leírás

fájlszám

Kötelező. Egész szám. Bármely érvényes fájlszám.

returntype

Kötelező. Egész. Number indicating the type of information to return. Az 1 érték megadásával a fájlmódot jelző értéket ad vissza. Csak 16 bites rendszereken a 2 érték megadásával olvassa be az operációs rendszer fájlkezelő fogópontját. A 2-es visszatérési típus nem támogatott a 32 bites rendszerekben, és hibát okoz.

Visszatérési értékek

Ha a visszatérésiargumentum értéke 1, a következő visszatérési értékek jelzik a fájlelérési módot:

Módusz:

Érték

Bevitel

1

Kimenet

2

Véletlen

4

Hozzáfűző

8

Bináris

32

Példa

Megjegyzés: A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.

Ebben a példában a FileAttr függvény egy megnyitott fájl fájlmódját és fogópontját adja vissza. A fájlkezelő csak 16 bites rendszereken ad vissza; 32 bites rendszereken a 2 második argumentumként való átadása hibát jelez.

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.

További segítségre van szüksége?

Office-jártasság bővítése
Oktatóanyagok megismerése
Új szolgáltatások listájának lekérése
Részvétel az Office Insider programban

Hasznos volt az információ?

×