Piezīme
Šajā tēmā aprakstītā funkcija, metode, objekts vai rekvizīts ir atspējots, ja Microsoft Jet Expression Service darbojas smilškastes režīmā, kas neļauj novērtēt potenciāli nedrošas izteiksmes. Lai iegūtu papildinformāciju par smilškastes režīmu, meklējiet "smilškastes režīms" palīdzībā.
Atgriež Long, kas apzīmē failu režīmu failiem, kas atvērti, izmantojot priekšrakstu Open .
Sintakse
FileAttr(faila numurs,atgriešanās tips)
Funkcijas FileAttr sintaksei ir šādi argumenti.
| Arguments | Apraksts |
|---|---|
| faila numurs | Obligāts arguments. Vesels skaitlis. Jebkurš derīgs faila numurs. |
| atgriešanas tips | Obligāts arguments. Vesels skaitlis. Skaitlis, kas norāda atgriežamās informācijas tipu. Norādiet 1, lai atgrieztu vērtību, kas norāda faila režīmu. Tikai 16 bitu sistēmās norādiet 2, lai izgūtu operētājsistēmas faila turi. ReturnType 2 netiek atbalstīts 32 bitu sistēmās un izraisa kļūdu. |
Atgrieztās vērtības
Ja arguments returntypeir 1, tālāk norādītās atgrieztās vērtības norāda faila piekļuves režīmu:
| Režīms | Vērtība |
|---|---|
| Ievade | 1 |
| Izvade | 2 |
| Nejaušs | 4 |
| Pievienot | 8 |
| Binārs | 32 |
Piemērs
Piezīme
Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.
Šajā piemērā tiek izmantota funkcija FileAttr , lai atgrieztu atvērta faila režīmu un faila turi. Faila turis tiek atgriezts tikai 16 bitu sistēmās; 32 bitu sistēmās, nododot 2 kā otro argumentu, rodas kļūda.
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.