GetAttr-Funktion
Aktualisiert: November 2007
Gibt einen FileAttribute-Wert zurück, der die Attribute einer Datei, eines Verzeichnisses oder Ordners darstellt.
Das My-Feature ermöglicht bei Datei-E/A-Vorgängen höhere Produktivität und Leistung als FileAttribute. Weitere Informationen hierzu finden Sie unter My.Computer.FileSystem-Objekt.
Public Function GetAttr(ByVal PathName As String) As FileAttribute
Parameter
- PathName
Erforderlich. String-Ausdruck, der einen Datei-, Verzeichnis- oder Ordnernamen angibt. PathName kann auch Verzeichnis-, Ordner- sowie Laufwerkangaben enthalten.
Rückgabewert
Der von GetAttr zurückgegebene Wert ist die Summe aus folgenden Enumerationswerten:
Wert |
Konstante |
Beschreibung |
---|---|---|
Normal |
vbNormal |
Normal. |
ReadOnly |
vbReadOnly |
Schreibgeschützt. |
Hidden |
vbHidden |
Ausgeblendet. |
System |
vbSystem |
Systemdatei. |
Directory |
vbDirectory |
Verzeichnis oder Ordner. |
Archive |
vbArchive |
Die Datei wurde nach der letzten Sicherung geändert. |
Alias |
vbAlias |
Die Datei hat einen anderen Namen. |
Hinweis: |
---|
Diese Enumerationen werden in der Visual Basic-Sprache angegeben. Die Namen können überall im Code anstelle von tatsächlichen Werten verwendet werden. |
Ausnahmen
Ausnahmetyp |
Fehlernummer |
Bedingung |
---|---|---|
Pathname ist ungültig oder enthält Platzhalterzeichen. |
||
Die Zieldatei ist nicht vorhanden. |
Beachten Sie die Spalte "Fehlernummer", wenn Sie Visual Basic 6.0-Anwendungen aktualisieren, die eine unstrukturierte Fehlerbehandlung verwenden. (Sie können die Fehlernummer mit der Number-Eigenschaft (Err-Objekt) vergleichen.) Wenn möglich, sollten Sie jedoch erwägen, eine solche Fehlerkontrolle durch Übersicht über die strukturierte Ausnahmebehandlung für Visual Basic zu ersetzen.
Hinweise
Lassen Sie mit dem And-Operator den von der GetAttr-Funktion zurückgegebenen Wert und den Wert des gewünschten Dateiattributs Bit für Bit vergleichen, um zu ermitteln, welche Attribute festgelegt sind. Wenn das Ergebnis ungleich 0 (null) ist, ist das jeweilige Attribut für die genannte Datei festgelegt. Der Rückgabewert des folgenden And-Ausdrucks ist z. B. 0 (null), wenn das Archive-Attribut nicht festgelegt ist:
Result = GetAttr(FName) And vbArchive
Wenn das Archive-Attribut festgelegt ist, ist der Rückgabewert ungleich 0 (null).
Beispiel
In diesem Beispiel werden mit der GetAttr-Funktion die Attribute einer Datei und eines Verzeichnisses oder Ordners ermittelt.
Dim MyAttr As FileAttribute
' Assume file TESTFILE is normal and readonly.
MyAttr = GetAttr("C:\TESTFILE.txt") ' Returns vbNormal.
' Test for normal.
If (MyAttr And FileAttribute.Normal) = FileAttribute.Normal Then
MsgBox("This file is normal.")
End If
' Test for normal and readonly.
Dim normalReadonly As FileAttribute
normalReadonly = FileAttribute.Normal Or FileAttribute.ReadOnly
If (MyAttr And normalReadonly) = normalReadonly Then
MsgBox("This file is normal and readonly.")
End If
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("C:\MYDIR")
If (MyAttr And FileAttribute.Directory) = FileAttribute.Directory Then
MsgBox("MYDIR is a directory")
End If
Hinweise für Entwickler intelligenter Geräte
Diese Funktion wird nicht unterstützt.
Anforderungen
Namespace:Microsoft.VisualBasic
**Modul:**FileSystem
**Assembly:**Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)
Siehe auch
Referenz
Weitere Ressourcen
Datei-, Verzeichnis- und Laufwerkseigenschaften in Visual Basic