Función FileAttr
Devuelve un valor Long que representa el modo de archivo de los archivos abiertos mediante la instrucción Open .
Sintaxis
FileAttr(filenumber, returntype)
La sintaxis de la función FileAttr tiene estos argumentos con nombre:
| Parte | Descripción |
|---|---|
| númeroArchivo | Requerido; Entero. Cualquier número de archivo válido. |
| returntype | Requerido; Entero. Número que indica el tipo de información que hay que devolver. Especifique 1 para devolver un valor que indique el modo de archivo. En sistemas de solamente 16 bits, especifique 2 para recuperar un identificador de archivos del sistema operativo. tipoDevuelto 2 no se admite en sistemas de 32 bits y causa un error. |
Valores devueltos
Cuando el argumentoreturntype es 1, los siguientes valores devueltos indican el modo de acceso a archivos:
| Modo | Valor |
|---|---|
| Entrada | 1 |
| Resultado | 2 |
| Aleatorio | 4 |
| Append | 8 |
| Binario | 32 |
Ejemplo
En este ejemplo se usa la función FileAttr para devolver el modo de archivo y el controlador de un archivo abierto. El controlador de archivo sólo se devuelve en los sistemas de 16 bits; en los sistemas de 32 bits, si se pasa 2 como segundo argumento, se genera un error.
Dim FileNum, Mode, Handle
FileNum = 1 ' Assign file number.
Open "TESTFILE" For Append As FileNum ' Open file.
Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2) ' Returns file handle.
Close FileNum ' Close file.
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.