Napomena
Funkcija, metod, objekat ili svojstvo opisani u ovoj temi onemogućeni su ako je usluga Microsoft Jet Expression Service pokrenuta u režimu "sandbox", što sprečava procenu potencijalno nebezbednih izraza. Više informacija o režimu "sandbox" potražite u pomoći za "režim sandbox".
Daje dugački tekst koji predstavlja režim datoteke za datoteke otvorene pomoću izraza Open .
Sintaksa
FileAttr(broj datoteke,tippovratka)
Sintaksa funkcije FileAttr ima sledeće argumente:
| Argument | Opis |
|---|---|
| broj datoteke | Obavezno. Ceo broj. Bilo koji važeći broj datoteke. |
| TipVraćanja | Obavezno. Ceo broj. Broj koji označava tip informacija koje treba da se dobiju. Navedite 1 da biste dobili vrednost koja označava režim datoteke. Samo na 16-bitnim sistemima navedite 2 da biste preuzeli regulator datoteke operativnog sistema. ReturnType 2 nije podržan u 32-bitnim sistemima i dovodi do greške. |
Povratne vrednosti
Kada je argument returntype1, sledeće povratne vrednosti ukazuju na režim pristupa datoteci:
| Modus | Vrednost |
|---|---|
| Unos | 1 |
| Izlaz | 2 |
| Nasumično | 4 |
| Upit za dodavanje | 8 |
| Binarni | 32 |
Primer
Napomena
Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
Ovaj primer koristi funkciju FileAttr kako bi se vratio režim datoteke i regulator otvorene datoteke. Regulator datoteke se vraća samo na 16-bitnim sistemima; Na 32-bitnim sistemima, prosleđivanje broja 2 kao drugog argumenta generiše greš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.