Uwaga: Funkcja, metoda, obiekt lub właściwość opisana w tym temacie jest wyłączona, jeśli usługa wyrażeń Microsoft Jet działa w trybie piaskownicy, co uniemożliwia oszacowanie potencjalnie niebezpiecznych wyrażeń. Aby uzyskać więcej informacji na temat trybu piaskownicy, wyszukaj "tryb piaskownicy" w Pomocy.
Zwraca wartość typu Liczba długa reprezentującą tryb pliku dla plików otwartych za pomocą instrukcji Open .
Składnia
FileAttr ( filenumber , returntype )
W składni funkcji FileAttr występują następujące argumenty:
|
Argument |
Opis |
|
numer pliku |
Argument wymagany. Liczba całkowita. Wszystkie prawidłowe numer pliku. |
|
Returntype |
Argument wymagany. Liczba całkowita. Liczba wskazująca typ informacji do zwrócenia. Określ 1, aby zwrócić wartość wskazującą tryb pliku. Tylko w systemach 16-bitowych określ wartość 2, aby pobrać uchwyt pliku systemu operacyjnego. returntype 2 nie jest obsługiwany w systemach 32-bitowych i powoduje błąd. |
Zwracane wartości
Jeśli argument zwracanego typu to 1, następujące wartości zwracane wskazują tryb dostępu do pliku:
|
Tryb |
Value (Wartość) |
|
Wprowadzanie danych |
1 |
|
Dane wyjściowe |
2 |
|
Losowe |
4 |
|
Dołączająca |
8 |
|
Binarny |
32 |
Przykład
Uwaga: Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.
W tym przykładzie użyto funkcji FileAttr w celu zwrócenia trybu pliku i uchwytu pliku otwartego pliku. Uchwyt pliku jest zwracany tylko w systemach 16-bitowych. w systemach 32-bitowych przekazywanie liczby 2 jako drugiego argumentu generuje błąd.
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.
