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 dugu vrijednost koja predstavlja način rada datoteke za datoteke otvorene pomoću naredbe Otvori.
Sintaksa
FileAttr ( brojdatoteka , returntype )
Sintaksa funkcije FileAttr sadrži ove argumente:
Argument |
Opis |
brojdatoteka |
Obavezno. Cjelobrojna. Sve valjane broj datoteke. |
returntype |
Obavezno. Cijeli broj. Broj koji označava vrstu informacija za vraćanje. Navedite 1 da biste vratili vrijednost koja označava način datoteke. Samo u 16-bitnim sustavima navedite 2 da biste dohvatili ručicu datoteke operacijskog sustava. returntype 2 nije podržan u 32-bitnim sustavima i uzrokuje pogrešku. |
Vraćanje vrijednosti
Kada je vrstaargument 1, sljedeće vrijednosti vraćanja označavaju način pristupa datoteci:
Mod |
Vrijednost |
Unos |
1 |
Izlaz |
2 |
Slučajno |
4 |
upit s dodavanjem |
8 |
Binary |
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 funkcija FileAttr koristi za vraćanje načina rada datoteke i ručice datoteke otvorene datoteke. Ručica datoteke vraća se samo u 16-bitnim sustavima; na 32-bitnim sustavima, prolazak 2 kao drugi argument 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.