Applies ToAccess za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Napomena: Funkcija, metoda, objekt ili svojstvo opisano u ovoj temi onemogućeno je ako je Microsoft Jet Expression Service pokrenut u načinu rada sigurnosne ograde, što onemogućuje procjenu potencijalno nesigurnih izraza. Dodatne informacije o načinu rada sigurnosne ograde potražite u pomoći u odjeljku "način rada s memorijom za testiranje".

Vraća cijeli broj koji predstavlja atribute datoteke, direktorija ili mape.

Sintaksa

GetAttr ( naziv puta )

Traženi naziv putaargument je nizovni izraz koji određuje naziv datoteke. Naziv puta može obuhvaćati direktorij ili mapu i pogon.

Vraćanje vrijednosti

Vrijednost koju vraća GetAttr zbroj je sljedećih vrijednosti atributa:

Konstanta

Value (Vrijednost)

Description (Opis)

vbNormal

0

Normalno.

vbReadOnly

1

Samo za čitanje.

vbHidden

2

Skrivene.

vbSystem

4

Sistemska datoteka. Nije dostupno na Macintosh.

vbDirectory

16

Direktorij ili mapa.

vbArhiviranje

32

Datoteka se promijenila od zadnjeg sigurnosnog kopiranja. Nije dostupno na Macintosh.

vbAlias

64

Navedeni je naziv datoteke pseudonim. Dostupno samo za Macintosh.

Napomena: Te konstante naveli su Visual Basic for Applications. Nazivi se mogu koristiti bilo gdje u kodu, a ne samo stvarnih vrijednosti.

Napomene

Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

Da biste odredili koji su atributi postavljeni, pomoću operatora Andusporedba na razini bitova vrijednost koju vraća funkcija GetAttr i vrijednost željenog atributa pojedinačne datoteke. Ako rezultat nije nula, taj je atribut postavljen za imenovanu datoteku. Na primjer, povratna vrijednost sljedećeg izraza And je nula ako atribut Arhiva nije postavljen:

Result = GetAttr(FName) And vbArchive

Ako je postavljen atribut Arhiva, vraća se vrijednost koja nije nula.

Primjer

U ovom se primjeru pomoću funkcije GetAttr određuju atributi datoteke i direktorija ili mape. Na Macintoshu su dostupne samo konstante 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.

Potrebna vam je dodatna pomoć?

Želite dodatne mogućnosti?

Istražite pogodnosti pretplate, pregledajte tečajeve za obuku, saznajte kako zaštititi uređaj i još mnogo toga.

Zajednice vam pomažu da postavljate pitanja i odgovarate na njih, pošaljete povratne informacije i čujete se sa stručnjacima s bogatim znanjem.