Nota: Nos gustaría proporcionarle el contenido de ayuda actual lo más rápido posible en su idioma. Esta página se ha traducido mediante un sistema automático y es posible que contenga imprecisiones o errores gramaticales. Nuestro objetivo es que este contenido sea útil para usted. ¿Puede informarnos sobre si la información le ha sido útil al final de la página? Aquí tiene el artículo en inglés para que pueda consultarlo fácilmente.
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:
Mode | 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.
