IBM Lotus Symphony


Função FileAttr [Runtime]

Devolve o modo de acesso ou o número de acesso de ficheiro de um ficheiro que tenha sido aberto com a instrução Open. O número de acesso do ficheiro está dependente do sistema operativo (OSH = Operating System Handle).

ícone de Nota Se utilizar um sistema operativo de 32 bits não poderá utilizar a função FileAttr para determinar o número de acesso do ficheiro.

Consulte também: Open

Sintaxe:

FileAttr (FileNumber As Integer, Attribute As Integer)

Valor de retorno:

Integer

Parâmetros:

FileNumber: O número do ficheiro aberto com a instrução Open.

Attribute: Expressão de valor inteiro que indica o tipo de informações do ficheiro que pretende devolver. É possível obter os seguintes valores:

1: A função FileAttr indica o modo de acesso do ficheiro.

2: A função FileAttr devolve o número de acesso ao ficheiro do sistema operativo.

Se especificar um atributo de parâmetro com um valor de 1, aplicam-se os seguintes valores de retorno:

1 - INPUT (ficheiro aberto para entrada de dados)

2 - OUTPUT (ficheiro aberto para saída de dados)

4 - RANDOM (ficheiro aberto para acesso aleatório)

8 - APPEND (ficheiro aberto para acrescento)

32 - BINARY (ficheiro aberto em modo binário).

Códigos de erro

5 Chamada de procedimento não válido

52 Erro no nome ou número do ficheiro

Exemplo:

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, "This is a line of text"

MsgBox FileAttr(#iNumber, 1 ),0,"Access mode"

MsgBox FileAttr(#iNumber, 2 ),0,"File attribute"

Close #iNumber

End Sub


Comentários sobre o produto | Documentação adicional | Marcas comerciais