FileAttr Function
Tagastab lause Open abil avatud faili juurdepääsurežiimi või faili lugemise numbri. Faili lugemise number sõltub operatsioonisüsteemist (OSH = Operating System Handle, operatsioonisüsteemi pide).
Kui kasutad 32-bitist operatsioonisüsteemi, siis ei saa faili lugemise numbri määramiseks funktsiooni FileAttr kasutada.
Vaata ka: Open
Süntaks:
FileAttr (FileNumber As Integer, Attribute As Integer)
Tagastusväärtus:
Täisarv
Parameetrid:
FileNumber: lause Open abil avatud faili number.
Attribute: täisarvavaldis, mis näitab tagastatava failiteabe tüüpi. Võimalikud on järgmised väärtused:
1: Funktsioon FileAttr määrab faili juurdepääsurežiimi.
2: Funktsioon FileAttr tagastab faili lugemise numbri operatsioonisüsteemis.
Kui määrad parameetri atribuudi väärtuseks 1, siis kehtivad järgmised tagastusväärtused:
1 - INPUT (fail on sisestuseks avatud)
1 - OUTPUT (fail on väljastuseks avatud)
4 - RANDOM (fail on juhuslikuks juurdepääsuks avatud)
8 - APPEND (fail on lisamiseks avatud)
32 - BINARY (fail on avatud kahendrežiimis).
Näide:
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, "See on rida teksti"
MsgBox FileAttr(#iNumber, 1 ),0,"Juurdepääsu režiim"
MsgBox FileAttr(#iNumber, 2 ),0,"Faili atribuut"
Close #iNumber
End Sub