Contents
Index 🔎︎

# FileAttr Function

Fano fooliishshonni fa'nantino injote garinni woy faylete injo kiiro qoltanno. Faylete injo kiiro assishshu amuraati aana irkidhanno(OSH = Assootu amuraati kasa).

32-Bite assootu amuraate horonsi'rittoro, faylete injo kiiro tirate FileAttr-Assishsha horonsi'ra didandaatto.

Hattono: Fani la'i

### Syntax:

    FayleteSona (FayleteKiiro Intijerete gede, Sona Intijerete gede)

### Return value:

Intijere

### Parameters:

FayleteKiiro: Fooliishsho fani yaannohunni fa'nantino faylete kiiro.

Sona: Qola hasiratto faylete mashalaqqe dana leellishanno Intijerete handaara. Konni woroonni noo hornyuwa dandiinanni:

1: FayleteSona-Assishsha faylete injo gara leellishanno.

2: FileAttr-Assishsha assootu amuraati faylete injo kiiro qolanno.

Eishshu sona 1 hornyinni badittoro, konni woroonni noo qolote hornyuwa loosaansitanno:

1 - EO (eote fayle fana)

2 - GUMA (gumaho fayle fana)

4 - RANDEME (hedeweelcho injora fayle fana)

8 - Qa'misa (maxxagisaho fayle fana)

32 - LAMINAATE (laminaatu gari giddo fayle fana).

### Error codes:

5 Horiweelo aante woshsho

52 Horiweelo faylete su'ma woy faylete kiiro

### Example:

    Sub ExampleFileAttr
        Dim iNumber As Integer
        Dim sLine As String
        Dim aFile As String
        aFile = "C:\Users\ThisUser\data.txt"
        iNumber = Freefile
        Open aFile For Output As #iNumber
        #ikiiro attami, "Kuni borrote xuruuraati"
        MsgBox FileAttr(#iNumber, 1), 0, "Access mode"
        MsgBox FileAttr(#iNumber, 2), 0, "File attribute"
        Close #iNumber
    End Sub

Fiixoo'mino umo

Close Statement

FreeFile Function

Open Statement

Print# Statement