FileSystem.GetAttr(String) Metoda

Definice

Obor názvů:
Microsoft.VisualBasic
Sestavení:
Microsoft.VisualBasic.dll

FileAttribute Vrátí hodnotu, která představuje atributy souboru, adresáře nebo složky. Tato My funkce poskytuje lepší produktivitu a výkon při vstupně-výstupních operacích souborů než FileAttribute. Další informace najdete na webu 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

Parametry

PathName
String

Required. Řetězcový výraz, který určuje název souboru, adresáře nebo složky. PathName může obsahovat adresář nebo složku a jednotku.

Návraty

FileAttribute

Bitová kombinace hodnot výčtu.

Výjimky

IOException

Pathname je neplatný nebo obsahuje zástupné kóty.

FileNotFoundException

Cílový soubor neexistuje.

Příklady

Tento příklad používá GetAttr funkci k určení atributů souboru a adresáře nebo složky.

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

Poznámky

Chcete-li určit, které atributy jsou nastaveny, použijte And operátor k provedení bitové porovnání hodnoty vrácené GetAttr funkcí a hodnotu jednotlivého atributu souboru, který chcete. Pokud výsledek není nula, nastaví se tento atribut pro pojmenovaný soubor. Například návratová hodnota následujícího And výrazu je nula, pokud Archive atribut není nastaven:

Result = GetAttr(FName) And vbArchive

Nenulová hodnota se vrátí, pokud Archive je nastaven atribut.

Platí pro

Viz také