Función FileAttr

Importante:  Este artículo se ha traducido con traducción automática; vea la declinación de responsabilidades. Para su referencia, puede encontrar la versión en inglés de este artículo aquí.

Nota: La función, el método, el objeto o la propiedad descritas en este tema se desactiva si se está ejecutando el servicio de expresión Microsoft Jet en modo de recinto de seguridad, lo que evita la evaluación de expresiones potencialmente no seguras. Para obtener más información sobre el modo de recinto de seguridad, busque "modo de recinto de seguridad" en la Ayuda.

Devuelve un valor Long que representa el modo de archivo para los archivos abiertos mediante la instrucción Abrir .

Sintaxis

FileAttr ( númeroarchivo , returntype )

La sintaxis de la función FileAttr tiene los siguientes argumentos:

Argumento

Descripción

FileNumber

Obligatorio. Entero. Cualquier válida número de archivo.

ReturnType

Obligatorio. Entero. Número que indica el tipo de información para devolver. Especifique 1 para devolver un valor que indica el modo de archivo. En sistemas de 16 bits, especifique 2 para recuperar un identificador de archivo del sistema operativo. tipodevuelto 2 no es compatible con sistemas de 32 bits y se produce un error.

Devolver valores

Cuando la returntypeargumento es 1, los siguientes valores devueltos indican el modo de acceso del archivo:

Modo

Valor

Entrada

1

Salida

2

Aleatorio

4

Anexar

8

Binario

32

Ejemplo

Nota: Los ejemplos siguientes muestran el uso de esta función en un Visual Basic para aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione la Referencia del programador en la lista desplegable situada junto a Buscar y escriba uno o varios términos en el cuadro de búsqueda.

Este ejemplo usa la función FileAttr para devolver el archivo modo y el controlador de un archivo abierto. El controlador de relleno se devuelve únicamente en sistemas de 16 bits; en los sistemas de 32 bits, pasa 2 como segundo argumento, 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.

Nota: Declinación de responsabilidades de traducción automática: Este artículo se ha traducido con un sistema informático sin intervención humana. Microsoft ofrece estas traducciones automáticas para que los hablantes de otros idiomas distintos del inglés puedan disfrutar del contenido sobre los productos, los servicios y las tecnologías de Microsoft. Puesto que este artículo se ha traducido con traducción automática, es posible que contenga errores de vocabulario, sintaxis o gramática.

Ampliar sus conocimientos
Explorar los cursos
Obtener nuevas características primero
Únase a los participantes de Office Insider

¿Le ha sido útil esta información?

¡Gracias por sus comentarios!

Gracias por sus comentarios. Quizá le interese ponerse en contacto con uno de nuestros agentes de soporte de Office.

×