Funkcja GetAttr

Ważne : Ten artykuł został przetłumaczony maszynowo, zobacz zastrzeżenie. Angielskojęzyczną wersję tego artykułu można znaleźć tutaj .

Uwaga : Funkcja, metody, obiektu lub właściwości opisane w tym temacie jest wyłączona, jeśli usługa wyrażeń programu Microsoft Jet działa w trybie piaskownicy, co uniemożliwia oceny potencjalnie niebezpieczne wyrażenia. Aby uzyskać więcej informacji na temat trybu piaskownicy wyszukaj ciąg "tryb piaskownicy" w Pomocy.

Zwraca liczbę całkowitą reprezentującą atrybuty pliku, katalogu lub folderu.

Składnia

GetAttr ( ścieżki )

Wymagane ścieżkiargument jest wyrażenie tekstowe, która określa nazwę pliku. Ścieżka może zawierać katalogu lub folderu i dysk.

Zwraca wartości

Wartość zwracana przez GetAttr jest sumą następujące atrybuty:

Stała

Wartość

Opis

vbNormal

0

Normalny.

vbReadOnly

1

Tylko do odczytu.

vbHidden

2

Ukryte.

vbSystem

4

Plik systemowy. Nie jest dostępna na komputerze Macintosh.

vbDirectory

16

Katalogu lub folderu.

vbArchive

32

Plik został zmieniony od czasu ostatniej kopii zapasowej. Nie jest dostępna na komputerze Macintosh.

vbAlias

64

Nazwa pliku jest alias. Dostępne tylko na komputerze Macintosh.


Uwaga : Te stałe są określane w języku Visual Basic for Applications. Nazwy mogą być używane w dowolnym miejscu w kodzie zamiast rzeczywistych wartości.

Spostrzeżenia

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.

Aby określić, które atrybuty są ustawione, należy użyć operatora i przeprowadzić porównanie bitowe wartości zwracane przez funkcję GetAttr i wartość atrybutu osobne pliki, które mają. Jeśli wynik nie wynosi zero, że dany atrybut jest ustawiony dla nazwanego pliku. Na przykład wartość zwróconą przez następujące wyrażenie i wynosi zero, jeśli nie ustawiono atrybut archiwizacji:

Result = GetAttr(FName) And vbArchive

Jeżeli atrybut archiwizacji jest ustawiony, zwracana jest wartość różną od zera.

Przykład

W tym przykładzie funkcja GetAttr określania atrybutów pliku i katalogu lub folderu. Na komputerze Macintosh, tylko stałe vbNormal, vbReadOnly, vbHidden i vbAlias są dostępne.

Dim MyAttr
' Assume file TESTFILE has hidden attribute set.
MyAttr = GetAttr("TESTFILE") ' Returns 2.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And vbHidden
' Assume file TESTFILE has hidden and
' read-only attributes set.
MyAttr = GetAttr("TESTFILE") ' Returns 3.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And (vbHidden + vbReadOnly)
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("MYDIR") ' Returns 16.

Uwaga : Zrzeczenie dotyczące tłumaczenia maszynowego: Ten artykuł został przetłumaczony przez system komputerowy bez interwencji człowieka. Firma Microsoft udostępnia te tłumaczenia maszynowe, aby ułatwić użytkownikom, którzy nie znają języka angielskiego, korzystanie z zawartości dotyczącej produktów, usług i technologii firmy Microsoft. Ponieważ ten artykuł został przetłumaczony maszynowo, może zawierać błędy w słownictwie, składniowe lub gramatyczne.

Rozwijaj swoje umiejętności
Poznaj szkolenia
Uzyskuj nowe funkcje w pierwszej kolejności
Dołącz do niejawnych testerów pakietu Office

Czy te informacje były pomocne?

Dziękujemy za opinię!

Dziękujemy za opinię! Wygląda na to, że połączenie Cię z jednym z naszych agentów pomocy technicznej pakietu Office może być pomocne.

×