ObtenerAtributo (función, GetAttr)

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 número entero que representa los atributos de un archivo, directorio o carpeta.

Sintaxis

ObtenerAtributo ruta de acceso del ()

La ruta de accesode requeridoargumento es expresión de cadena que especifica un nombre de archivo. Ruta de acceso puede incluir el directorio o carpeta y la unidad.

Devolver valores

El valor devuelto por GetAttr es la suma de los valores de atributo siguientes:

Constante

Valor

Descripción

vbNormal

0

Normal.

vbReadOnly

1

Sólo lectura.

vbHidden

2

Oculto.

vbSystem

4

Archivo del sistema. No está disponible en Macintosh.

vbDirectory

16

Directorio o carpeta.

vbArchive

32

Archivo ha cambiado desde la última copia de seguridad. No está disponible en Macintosh.

vbAlias

64

Nombre de archivo especificado es un alias. Disponible sólo en Macintosh.


Nota: Estas constantes las especifica Visual Basic para aplicaciones. Los nombres pueden utilizarse en cualquier lugar del código en lugar de los valores reales.

Observaciones

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.

Para determinar qué atributos se establecen, use el operador y llevar a cabo una comparación bit a bit del valor devuelto por la función ObtenerAtributo y el valor del atributo de archivo individual que desee. Si el resultado no es cero, que está establecido para el archivo con nombre. Por ejemplo, el valor devuelto de la siguiente expresión And es cero si no se establece el atributo de archivo:

Result = GetAttr(FName) And vbArchive

Si se establece el atributo de archivo, se devuelve un valor distinto de cero.

Ejemplo

Este ejemplo usa la función GetAttr para determinar los atributos de un archivo, directorio o carpeta. En Macintosh, solo las constantes vbNormal, vbReadOnly, vbHidden y vbAlias están disponibles.

Dim MyAttr
' Assume file TESTFILE has hidden attribute set.
MyAttr = GetAttr("TESTFILE") ' Returns 2.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And vbHidden
' Assume file TESTFILE has hidden and
' read-only attributes set.
MyAttr = GetAttr("TESTFILE") ' Returns 3.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And (vbHidden + vbReadOnly)
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("MYDIR") ' Returns 16.

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.

×