Função GetAttr

Importante :  Este artigo foi traduzido por um sistema de tradução automática, leia o aviso de isenção de responsabilidade. Para sua referência, veja a versão em inglês deste artigo aqui.

Observação : A função, método, objeto ou propriedade descrito neste tópico será desabilitada se o Microsoft Jet Expression Service está em execução no modo de área restrita, o que impede a avaliação das expressões possivelmente não seguras. Para obter mais informações sobre o modo seguro, procure por "modo seguro" na Ajuda.

Retorna um número inteiro que representa os atributos de um arquivo, diretório ou pasta.

Sintaxe

GetAttr ( caminho )

O caminhode necessárioargumento é um expressão de cadeia de caracteres que especifica um nome de arquivo. O nome do caminho pode incluir o diretório ou pasta e a unidade.

Retornar valores

O valor retornado por GetAttr é a soma dos valores de atributo a seguir:

Constante

Valor

Descrição

vbNormal

0

Normal.

vbReadOnly

1

Somente leitura.

vbHidden

2

Oculto.

vbSystem

4

Arquivo de sistema. Não disponível no Macintosh.

vbDirectory

16

Diretório ou pasta.

vbArchive

32

Arquivo foi alterado desde o último backup. Não disponível no Macintosh.

vbAlias

64

Nome de arquivo especificado é um alias. Disponível somente no Macintosh.


Observação : Constantes são especificadas pelo Visual Basic for Applications. Os nomes podem ser usados em qualquer lugar no seu código no lugar dos valores reais.

Comentários

Observação : Exemplos a seguir demonstram o uso dessa função em um Visual Basic para módulo Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione a Referência do desenvolvedor na lista suspensa ao lado de pesquisa e insira um ou mais termos na caixa de pesquisa.

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

Result = GetAttr(FName) And vbArchive

Um valor diferente de zero será retornado se o atributo de arquivamento está definido.

Exemplo

Este exemplo usa a função GetAttr para determinar os atributos de um arquivo e diretório ou pasta. No Macintosh, apenas as constantes vbNormal, vbReadOnly, vbHidden e vbAlias estão disponíveis.

Dim MyAttr
' Assume file TESTFILE has hidden attribute set.
MyAttr = GetAttr("TESTFILE") ' Returns 2.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And vbHidden
' Assume file TESTFILE has hidden and
' read-only attributes set.
MyAttr = GetAttr("TESTFILE") ' Returns 3.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And (vbHidden + vbReadOnly)
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("MYDIR") ' Returns 16.

Observação : Aviso de Isenção de Tradução Automática: Este artigo foi traduzido por computador, sem intervenção humana. A Microsoft oferece essas traduções automáticas para ajudar as pessoas que não falam inglês a aproveitar os textos escritos sobre produtos, serviços e tecnologias da Microsoft. Como este artigo foi traduzido automaticamente, é possível que contenha erros de vocabulário, sintaxe ou gramática.

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Office Insider

Essas informações foram úteis?

Obrigado por seus comentários!

Agradecemos pelos seus comentários! Parece que pode ser útil conectar você a um de nossos agentes de suporte do Office.

×