Atributos

Retorna os atributos de um arquivo.

Sintaxe

Atributos

Retorno

Inteiro: contém codificação dos atributos do arquivo.

Mais informações

Valores dos atributos:

• Read Only – Arquivo definido como somente leitura:
• Hidden – Arquivo ou diretório oculto.
• System – O arquivo ou diretório pertence ao sistema operacional.
• 16- Diretório – O item é um diretório.
• 32- Arquivo – O arquivo ou diretório é um arquivo ou diretório de arquivo.
• 64- Dispositivo – Reservado, não usar.
• 128 - Normal – Arquivo sem atributos.
• 256 - Arquivo temporário – Arquivo identificado como temporário.
• 512 - Arquivo esparso – Este arquivo tem o atributo esparso atribuído a ele.
• 1024 - Ponto de nova análise – o arquivo ou diretório tem um ponto de nova análise alocado a ele.
• 2048 - Comprimido – Arquivo ou diretório comprimido.
• 4096 - Offline – O arquivo foi movido para armazenamento offline e não há dados disponíveis no momento.
• 8192 - Sem índice – O arquivo não será indexado.
• 16384 - Criptografado – Arquivo criptografado.

Exemplo

Exibe os atributos de calc.exe:

Function Main

Dim textfile As Object

Dim att As Integer

Set textfile = File.Connect("127.0.0.1")

If textfile.Open("c:\windows\system32\calc.exe", GENERIC_READ, Open_Existing) Then

att = Textfile.Attributes

echo(“O valor de atributo de Calc.exe : " & att)

textfile.Close

End If

End Function