FileAttr Function

FileAttr palauttaa Open-lauseella avatun tiedoston saantitavan tai tiedoston saantinumeron. Tiedoston saantinumero on käyttöjärjestelmäriippuvainen (OSH).

Käytettäessä 32-bittistä käyttöjärjestelmää, FileAttr-funktiota ei voi käyttää tiedoston saantinumeron määrittämiseen.

Katso myös: Open

Syntaksi:


FileAttr ((tiedostonro1 As Integer, attribuutti1 As Integer)

Paluuarvo:

Integer-tyypin kokonaisluku

Parametrit:

Tiedostonro1: sen tiedoston numero, joka on avattu Open-lauseella.

Attribuutti1: kokonaislukulauseke, joka ilmaisee, minkä tyyppistä tietoa tiedostosta halutaan palauttaa. Seuraavat arvot ovat mahdollisia:

1: FileAttr-funktio ilmaisee tiedoston saantitavan.

2: FileAttr-funktio palauttaa tiedoston käyttöjärjestelmän käyttämän saantinumeron.

Jos attribuutti1-parametrilla on arvo 1, seuraavat palautusarvot ovat käytössä:

1 - INPUT (tiedosto avattu kirjoittamiselle)

2 - OUTPUT (tiedosto avattu lukemiselle)

4 - RANDOM (tiedosto avattu suorasaantia varten)

8 - APPEND (tiedosto avattu jatkamista varten)

32 - BINARY (tiedosto avattu binääritilaan).

Virhekoodit:

5 Virheellinen proseduurikutsu

52 Virheellinen tiedoston nimi tai numero

Esimerkki:


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
    Print #iNumber, "Tämä on tekstirivi."
    MsgBox FileAttr(#iNumber, 1), 0, "Access mode"
    MsgBox FileAttr(#iNumber, 2), 0, "File attribute"
    Close #iNumber
End Sub