IBM Lotus Symphony


Función FileAttr [Ejecución]

Devuelve el modo de acceso o el número de acceso a un archivo que se ha abierto con la sentencia Open. El número de acceso al archivo depende del sistema operativo (OSH = Operating System Handle).

Icono de nota Si utiliza un sistema operativo de 32 bits, no puede utilizar la función FileAttr para determinar el número de acceso al archivo.

Consulte también: Open

Sintaxis:

FileAttr (FileNumber As Integer, Attribute As Integer)

Valor de retorno:

Entero

Parámetros:

FileNumber: número del archivo que se ha abierto con la instrucción Open.

Attribute: expresión de entero que indica el tipo de información de archivo que desea que se devuelva. Los valores siguientes son posibles:

1: la función FileAttr indica la modalidad de acceso del archivo.

2: la función FileAttr devuelve el número de acceso al archivo del sistema operativo.

Si especifica un atributo de parámetro con un valor 1, se aplican los valores de retorno siguientes:

1: INPUT (archivo abierto para entrada)

2: OUTPUT (archivo abierto para salida)

4: RANDOM (archivo abierto para acceso aleatorio)

8: APPEND (archivo abierto para adición)

32: BINARY (archivo abierto en modalidad binaria).

Códigos de error

5 Inicio del proceso no válido

52 Nombre de archivo o número incorrectos

Ejemplo:

Sub ExampleFileAttr

Dim iNumero As Integer

Dim sLinea As String

Dim aArchivo As String

aArchivo = "c:\data.txt"

iNumero = Freefile

Open aArchivo For Output As #iNumero

Print #iNumero, "Esta es una línea de texto"

MsgBox FileAttr(#iNumero, 1 ),0,"Modalidad de acceso"

MsgBox FileAttr(#iNumero, 2 ),0,"Atributo de archivo"

Close #iNumero

End Sub


Comentarios del producto | Documentación adicional | Marcas registradas