FileSystem.GetAttr(String) Metod

Definition

Returnerar ett FileAttribute värde som representerar attributen för en fil, katalog eller mapp. Funktionen My ger bättre produktivitet och prestanda i fil-I/O-åtgärder än FileAttribute. Mer information finns i FileSystem.

public:
 static Microsoft::VisualBasic::FileAttribute GetAttr(System::String ^ PathName);
public static Microsoft.VisualBasic.FileAttribute GetAttr(string PathName);
static member GetAttr : string -> Microsoft.VisualBasic.FileAttribute
Public Function GetAttr (PathName As String) As FileAttribute

Parametrar

PathName
String

Required. Ett stränguttryck som anger ett fil-, katalog- eller mappnamn. PathName kan innehålla katalogen eller mappen och enheten.

Returer

En bitvis kombination av uppräkningsvärdena.

Undantag

Pathname är ogiltigt eller innehåller jokertecken.

Målfilen finns inte.

Exempel

I det GetAttr här exemplet används funktionen för att fastställa attributen för en fil och katalog eller mapp.

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

Kommentarer

För att avgöra vilka attribut som anges använder du operatorn And för att utföra en bitvis jämförelse av värdet som returneras av GetAttr funktionen och värdet för det enskilda filattributet som du vill använda. Om resultatet inte är noll anges det attributet för den namngivna filen. Till exempel är returvärdet för följande And uttryck noll om Archive attributet inte har angetts:

Result = GetAttr(FName) And vbArchive

Ett värde som inte är noll returneras om Archive attributet har angetts.

Gäller för

Se även