FileSystem.GetAttr(String) Método

Definição

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

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

Retornos

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

Exceções

Pathname é inválido ou contém caracteres curinga.

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 sã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