FileSystem.GetAttr(String) Método

Definição

Retorna um FileAttribute valor que representa os atributos de um arquivo, diretório ou pasta. O My recurso oferece melhor produtividade e desempenho em operações de E/S de arquivo do que FileAttribute. Para obter mais informações, consulte 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

Parâmetros

PathName
String

Required. Uma expressão de cadeia de caracteres que especifica um arquivo, diretório ou nome da pasta. PathName pode incluir o diretório ou a pasta e a unidade.

Retornos

Uma combinação bit a bit dos valores de enumeração.

Exceções

Pathname é inválido ou contém curingas.

O arquivo de destino não existe.

Exemplos

Este exemplo usa a GetAttr função para determinar os atributos de um arquivo e diretório ou pasta.

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

Comentários

Para determinar quais atributos estão definidos, use o And operador para executar uma comparação bit a bit do valor retornado pela GetAttr função e o valor do atributo de arquivo individual desejado. Se o resultado não for zero, esse atributo será definido para o arquivo nomeado. Por exemplo, o valor retornado da expressão a seguir And será zero se o Archive atributo não estiver definido:

Result = GetAttr(FName) And vbArchive

Um valor diferente de zero será retornado se o Archive atributo estiver definido.

Aplica-se a

Confira também