GetAttr-Funktion

Wichtig :  Dieser Artikel wurde maschinell übersetzt. Bitte beachten Sie den Haftungsausschluss. Die englische Version des Artikels ist als Referenz hier verfügbar: hier.

Hinweis : Die Funktion, die Methode, das Objekt oder die Eigenschaft, die bzw. das in diesem Thema erläutert wird, ist deaktiviert, falls der Ausdrucksdienst in Microsoft Jet im geschützten Modus (Sandbox Mode) ausgeführt wird. In diesem Modus wird die Auswertung von potenziell unsicheren Ausdrücken verhindert. Weitere Informationen zum geschützten Modus erhalten Sie, wenn Sie in der Hilfe nach "sandbox mode" suchen.

Gibt eine ganze Zahl zurück, die die Attribute einer Datei, eines Verzeichnisses oder eines Ordners darstellt.

Syntax

GetAttr ( Pfadnamen )

Die erforderlichen PfadnamenArgument ist ein Zeichenfolgenausdruck, der einen Dateinamen angibt. Pfadnamen möglicherweise Verzeichnis oder Ordner sowie das Laufwerk beinhalten.

Rückgabewerte

Der Wert, der von GetAttr zurückgegeben wird, ist die Summe der folgenden Attributwerte:

Konstante

Wert

Beschreibung

vbNormal

0

Normal.

vbReadOnly

1

Schreibgeschützt.

vbHidden

2

Ausgeblendet.

vbSystem

4

Systemdatei. Nicht verfügbar auf dem Macintosh.

vbDirectory

16

Verzeichnis oder Ordner.

vbArchive

32

Datei ist seit der letzten Sicherung geändert worden. Nicht verfügbar auf dem Macintosh.

vbAlias

64

Der angegebene Dateiname ist ein Alias. Nur auf dem Macintosh verfügbar.


Hinweis : Diese Konstanten werden von Visual Basic für Applikationen angegeben. Die Namen können überall im Code anstelle der tatsächlichen Werte verwendet werden.

Hinweise

Hinweis : Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

Verwenden Sie den Und-Operator, um zu ermitteln, welche Attribute festgelegt werden, um einen Bitweiser Vergleich zwischen dem Wert auszuführen, der von der GetAttr-Funktion zurückgegeben wird, und dem Wert des einzelnen gewünschten Dateiattributs. Wenn das Ergebnis ungleich Null ist, wird das Attribut für die benannte Datei festgelegt. Der Rückgabewert des folgenden Und-Ausdrucks ist beispielsweise Null, wenn kein Archivattribut festgelegt ist:

Result = GetAttr(FName) And vbArchive

Wenn das Archivattribut festgelegt ist, wird ein Wert ungleich Null zurückgegeben.

Beispiel

In diesem Beispiel wird zur Ermittlung der Attribute einer Datei, eines Verzeichnisses oder eines Ordners die GetAttr-Funktion verwendet. Auf dem Macintosh stehen nur die vbNormal-, vbReadOnly-, vbHidden- und vbAlias-Konstanten zur Verfügung.

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.

Hinweis : Haftungsausschluss für maschinelle Übersetzungen: Dieser Artikel wurde mithilfe eines Computersystems und ohne jegliche Bearbeitung durch Personen übersetzt. Microsoft bietet solche maschinellen Übersetzungen als Hilfestellung für Benutzer ohne Englischkenntnisse an, damit Sie von den Informationen zu Produkten, Diensten und Technologien von Microsoft profitieren können. Da es sich bei diesem Artikel um eine maschinelle Übersetzung handelt, enthält er möglicherweise Fehler in Bezug auf (Fach-)Terminologie, Syntax und/oder Grammatik.

Teilen Facebook Facebook Twitter Twitter E-Mail E-Mail

War diese Information hilfreich?

Sehr gut. Noch anderes Feedback?

Was können wir verbessern?

Vielen Dank für Ihr Feedback!

×