Funktionen GetAttr

Vigtigt: Denne artikel er maskinoversat. Se ansvarsfraskrivelsen. Du kan finde den engelske version af denne artikel her til din orientering.

Bemærk: Den funktion, metode, objekt eller egenskab, der er beskrevet i dette emne er deaktiveret, hvis Microsoft Jet Expression Service kører i sandkassetilstand, hvilket forhindrer evaluering af potentielt usikre udtryk. Du kan finde flere oplysninger om sandkassetilstand, søge efter "sandkassetilstand" i Hjælp.

Returnerer et heltal , der repræsenterer attributterne for en fil, en mappe eller en mappe.

Syntaks

GetAttr ( stinavn )

Krævede stinavnargument er strengudtryk, der angiver et filnavn. Stinavn kan indeholde mappen eller mappe, og drevet.

Returnere værdier

Den værdi, der returneres af GetAttr er summen af følgende attributter værdier:

Konstant

Value

Beskrivelse

vbNormal

0

Normal.

vbReadOnly

1

Skrivebeskyttet.

vbHidden

2

Skjult.

vbSystem

4

Systemfil. Ikke tilgængelig på Macintosh.

Du kan dog

16

Mappe eller en mappe.

vbArchive

32

Filen er ændret siden seneste sikkerhedskopiering. Ikke tilgængelig på Macintosh.

vbAlias

64

Angivne filnavn er et alias. Kun tilgængelig på Macintosh.


Bemærk: Disse konstanter angives af Visual Basic for Applications. Navnene kan bruges overalt i din kode i stedet for de faktiske værdier.

Bemærkninger

Bemærk: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.

For at bestemme, hvilke attributter angives skal du bruge operatoren og til at udføre en bitvis sammenligning af den værdi, der returneres af funktionen GetAttr og værdien for attributten individuelle filer, du vil. Hvis resultatet ikke er nul, angives attributten for den navngivne fil. For eksempel er returværdien for følgende udtryk og nul, hvis attributten Arkiv ikke er angivet:

Result = GetAttr(FName) And vbArchive

Hvis attributten Arkiv er angivet, returneres en værdi.

Eksempel

Dette eksempel bruges funktionen GetAttr til at bestemme attributterne for en fil og en mappe eller en mappe. På Macintosh kun konstanterne vbNormal, vbReadOnly, er vbHidden og vbAlias tilgængelige.

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.

Bemærk: Ansvarsfraskrivelse for maskinoversættelse: Denne artikel er blevet oversat af et computersystem uden menneskelig indgriben. Microsoft tilbyder disse maskinoversættelse for at hjælpe ikke-engelsktalende brugere til at kunne nyde indhold om Microsofts produkter, tjenester og teknologier. Da artiklen er maskinoversat, kan den indeholde forkerte ord eller syntaks- eller grammatikfejl.

Udvid dine færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Bliv Office Insider

Var disse oplysninger nyttige?

Tak for din feedback!

Tak for din feedback! Det lyder, som om det vil kunne hjælpe, hvis du bliver sat i forbindelse med en af vores Office-supportteknikere.

×