IBM Lotus Symphony
|
Vráti režim prístupu alebo číslo prístupu k súboru, otvorenému príkazom Open. Číslo prístupu k súboru závisí od operačného systému (OSH = identifikátor operačného systému).
![]() |
Ak používate 32-bitový operačný systém, funkciu FileAttr nemôžete použiť na určenie čísla prístupu k súboru. |
Pozrite si tiež: Open
FileAttr (FileNumber As Integer, Attribute As Integer)
Typ Integer
FileNumber: Číslo súboru, otvoreného príkazom Open.
Attribute: Celočíselný výraz, indikujúci typ informácií o súbore, ktoré sa majú vrátiť. Možné sú tieto hodnoty:
1: Funkcia FileAttr indikuje režim prístupu k súboru.
2: Funkcia FileAttr vráti číslo prístupu operačného systému k súboru.
Ak zadáte atribút parametra s hodnotou 1, budú platiť tieto návratové hodnoty:
1 - INPUT (súbor je otvorený pre vstup)
2 - OUTPUT (súbor je otvorený pre výstup)
4 - RANDOM (súbor je otvorený pre náhodný prístup)
8 - APPEND (súbor je otvorený pre pripojenie)
32 - BINARY (súbor je otvorený v binárnom režime).
Sub ExampleFileAttr
Dim iNumber As Integer
Dim sLine As String
Dim aFile As String
aFile = "c:\data.txt"
iNumber = Freefile
Open aFile For Output As #iNumber
Print #iNumber, "toto je riadok textu"
MsgBox FileAttr(#iNumber, 1 ),0,"Režim prístupu"
MsgBox FileAttr(#iNumber, 2 ),0,"Atribút súboru"
Close #iNumber
End Sub