Module
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

## Ganallo:

    FayleteSona (FayleteKiiro Intijerete gede, Sona Intijerete gede)

## Qolote guma:

Intijere

## Eishshuwa:

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

## Lawishsha:

    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
        #ikiiro attami, "Kuni borrote xuruuraati"
        MsgBox FileAttr(#iNumber, 1 ),0,"Injo gara"
        MsgBox FileAttr(#iNumber, 2 ),0,"Faylete sona"
        Close #iNumber
    End Sub