Log på med Microsoft
Log på, eller opret en konto.
Hej
Markér en anden konto.
Du har flere konti
Vælg den konto, du vil logge på med.

Bemærk!: Funktionen, metoden, objektet eller egenskaben, der er beskrevet i dette emne, deaktiveres, hvis Microsoft Jet Expression Service kører i sandkassetilstand, hvilket forhindrer evalueringen af potentielt usikre udtryk. Søg efter "sandkassetilstand" i Hjælp, hvis du vil have mere at vide om sandkassetilstand.

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

Syntaks

GetAttr ( stinavn )

Det påkrævede stinavnargument er en strengudtryk , der angiver et filnavn. Stinavnet kan indeholde mappen eller mappen og drevet.

Returværdier

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

Konstant

Værdi

Beskrivelse

vbNormal

0

Normal.

vbReadOnly

1

Skrivebeskyttet.

vbHidden

2

Skjulte.

vbSystem

4

Systemfil. Ikke tilgængelig på Macintosh.

vbDirectory

16

Mappe eller mappe.

vbArchive

32

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

vbAlias

64

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


Bemærk!: Disse konstanter er angivet 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.

Hvis du vil finde ud af, hvilke attributter der er angivet, skal du bruge operatoren And til at udføre en bitvis sammenligning af den værdi, der returneres af funktionen GetAttr og værdien af den individuelle filattribut, du ønsker. Hvis resultatet ikke er nul, angives denne attribut for den navngivne fil. Returværdien for følgende And-udtryk er f.eks. nul, hvis attributten Arkiv ikke er angivet:

Result = GetAttr(FName) And vbArchive

Der returneres en værdi, der ikke er nul, hvis attributten Arkiv er angivet.

Eksempel

I dette eksempel bruges funktionen GetAttr til at bestemme attributterne for en fil og mappe. På Macintosh er det kun konstanterne vbNormal, vbReadOnly, vbHidden og vbAlias, der er 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.

Har du brug for mere hjælp?

Vil du have flere indstillinger?

Udforsk abonnementsfordele, gennemse kurser, få mere at vide om, hvordan du sikrer din enhed og meget mere.

Communities hjælper dig med at stille og besvare spørgsmål, give feedback og høre fra eksperter med omfattende viden.

Var disse oplysninger nyttige?

Hvor tilfreds er du med kvaliteten af sproget?
Hvad påvirkede din oplevelse?
Når du trykker på Send, bliver din feedback brugt til at forbedre Microsoft-produkter og -tjenester. Din it-administrator kan indsamle disse data. Erklæring om beskyttelse af personlige oplysninger.

Tak for din feedback!

×