Notă: Funcția, metoda, obiectul sau proprietatea descrisă în acest subiect este dezactivată dacă serviciul Microsoft Jet Expression rulează în modul sandbox, ceea ce împiedică evaluarea expresiilor potențial nesigure. Pentru mai multe informații despre modul sandbox, căutați "mod sandbox" în ajutor.

Returnează un număr întreg reprezentând atributele unui fișier, director sau folder.

Sintaxă

GetAttr ( PATHNAME )

argument PATHNAME necesare este o expresie șir care specifică un nume de fișier. PATHNAME poate include directorul sau folderul și unitatea.

Valori returnate

Valoarea returnată de GetAttr este suma următoarelor valori de atribut:

Constantă

valoare

Descriere

vbNormal

0

Normal.

vbReadOnly

1

Doar în citire.

vbHidden

2

Ascunse.

vbSystem

4

Fișier sistem. Nu este disponibil pe Macintosh.

vbDirectory

16

Director sau folder.

vbArchive

32

Fișierul s-a modificat de la ultima copiere de rezervă. Nu este disponibil pe Macintosh.

vbAlias

64

Numele de fișier specificat este un alias. Disponibil doar pe Macintosh.


Notă: Aceste constante sunt specificate în Visual Basic for Applications. Numele se pot utiliza oriunde în cod, în locul valorilor efective.

Observații

Notă: Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.

Pentru a determina ce atribute sunt setate, utilizați operatorul and pentru a efectua o comparație la nivel de bit a valorii returnate de funcția GetAttr și valoarea atributului de fișier individual dorit. Dacă rezultatul nu este zero, acel atribut este setat pentru fișierul denumit. De exemplu, valoarea returnată a următoarelor și a expresiei este zero dacă atributul arhivă nu este setat:

Result = GetAttr(FName) And vbArchive

Se returnează o valoare nenulă dacă atributul arhivă este setat.

Exemplu

Acest exemplu utilizează funcția GetAttr pentru a determina atributele unui fișier și director sau folder. Pe Macintosh, sunt disponibile numai constantele vbNormal, vbReadOnly, vbHidden și vbAlias.

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.

Aveți nevoie de ajutor suplimentar?

Extindeți-vă competențele
Explorați instruirea
Fiți primul care obține noile caracteristici
Alăturați-vă utilizatorilor Insider Microsoft Office

Au fost utile aceste informații?

Cât de mulțumit sunteți de calitatea limbajului?
Ce v-a afectat experiența?

Vă mulțumim pentru feedback!

×