Funkcija FileAttr

Primjenjuje se na
Access za Microsoft 365 Access 2021 Access 2019 Access 2016

Napomena

Funkcija, metoda, objekt ili svojstvo opisani u ovoj temi onemogućeni su ako je servis izraza Microsoft Jet pokrenut u načinu rada s memorijom za testiranje, što sprječava procjenu potencijalno nesigurnih izraza. Dodatne informacije o načinu rada s memorijom za testiranje potražite u pomoći "način rada s memorijom za testiranje".

Vraća vrijednost Long koja predstavlja datotečni način za datoteke otvorene pomoću naredbe Open .

Sintaksa

FileAttr(brojdatoteke ,vrstapovrata)

Sintaksa funkcije FileAttr sadrži ove argumente:

Argument Opis
broj datoteke Obavezno. Cijeli broj. Bilo koji valjani broj datoteke.
VrstaPovratka Obavezno. Cijeli broj. Broj koji označava vrstu podataka koji će biti vraćeni. Navedite 1 da biste vratili vrijednost koja označava način datoteke. Samo na 16-bitnim sustavima navedite 2 da biste dohvatili držač datoteke operacijskog sustava. ReturnType 2 nije podržan u 32-bitnim sustavima i uzrokuje pogrešku.

Vraćene vrijednosti

Kada je argument returntype1, sljedeće vraćene vrijednosti označavaju način pristupa datoteci:

Način rada Vrijednost
Unos 1
Izlaz 2
Slučajno 4
upit s dodavanjem 8
Binarni sustav 32

Primjer

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.

U ovom se primjeru koristi funkcija FileAttr da bi se prikazao način datoteke i držač otvorene datoteke. Naziv držača datoteke vraća se samo u 16-bitnim sustavima; U 32-bitnim sustavima prosljeđivanje 2 kao drugog argumenta generira pogrešku.

Dim FileNum, Mode, Handle
FileNum = 1    ' Assign file number.
Open "TESTFILE" For Append As FileNum    ' Open file.
Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2) ' Returns file handle.
Close FileNum    ' Close file.