Pastaba
Šioje temoje aprašyta funkcija, metodas, objektas arba ypatybė išjungiama, jei "„Microsoft“ Jet" reiškinių tarnyba veikia smėlio dėžės režimu, kuris neleidžia įvertinti potencialiai nesaugių reiškinių. Daugiau informacijos apie smėlio dėžės režimą ieškokite žinyne "smėlio dėžės režimas".
Pateikia reikšmę Ilgas, žymintis failų, atidarytų naudojant sakinį Open , failų režimą.
Sintaksė
FileAttr(failo numeris,grąžinimo tipas)
Funkcijos FileAttr sintaksę sudaro šie argumentai:
| Argumentas | Aprašymas |
|---|---|
| failo numeris | Būtinas. Sveikasis skaičius. Bet kuris galiojantis failo numeris. |
| grąžinimo tipas | Būtinas. Sveikasis skaičius. Skaičius, nurodantis grąžintinos informacijos tipą. Nurodykite 1, kad būtų grąžinta reikšmė, nurodanti failo režimą. Tik 16 bitų sistemose nurodykite 2, kad gautumėte operacinės sistemos failo rankenėlę. "ReturnType 2" nepalaikoma 32 bitų sistemose ir sukelia klaidą. |
Pateikiamos reikšmės
Kai returntypeargumentas yra 1, toliau pateiktos reikšmės nurodo failo prieigos režimą:
| Režimas | Reikšmė |
|---|---|
| Įvestis | 1 |
| Išvestis | 2 |
| Atsitiktinis | 4 |
| Papildymo | 8 |
| Dvejetainis | 32 |
Pavyzdys
Pastaba
Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.
Šiame pavyzdyje naudojama funkcija FileAttr grąžina atidaryto failo režimą ir failų rankenėlę. Failo rankenėlė grąžinama tik 16 bitų sistemose; 32 bitų sistemose perduodant 2 kaip antrą argumentą, įvyksta klaida.
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.