FileSystem.GetAttr(String) Метод
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Возвращает значение FileAttribute, представляющее атрибуты файла, каталога или папки. Функция My обеспечивает более высокие показатели производительности и быстродействия в операциях файлового ввода-вывода в сравнении с FileAttribute. Для получения дополнительной информации см. FileSystem.
public:
static Microsoft::VisualBasic::FileAttribute GetAttr(System::String ^ PathName);public static Microsoft.VisualBasic.FileAttribute GetAttr (string PathName);static member GetAttr : string -> Microsoft.VisualBasic.FileAttributePublic Function GetAttr (PathName As String) As FileAttributeПараметры
- PathName
- String
Обязательный. Строковое выражение, определяющее имя файла, каталога или папки. Выражение PathName может содержать имя каталога или папки и имя диска.
Возвращаемое значение
Побитовое сочетание значений перечисления.
Исключения
Параметр Pathname недопустим или содержит подстановочный знак.
Указанный файл не существует.
Примеры
В этом примере функция используется GetAttr для определения атрибутов файла, каталога или папки.
Dim MyAttr As FileAttribute
' Assume file TESTFILE is normal and readonly.
MyAttr = GetAttr("C:\TESTFILE.txt") ' Returns vbNormal.
' Test for normal.
If (MyAttr And FileAttribute.Normal) = FileAttribute.Normal Then
MsgBox("This file is normal.")
End If
' Test for normal and readonly.
Dim normalReadonly As FileAttribute
normalReadonly = FileAttribute.Normal Or FileAttribute.ReadOnly
If (MyAttr And normalReadonly) = normalReadonly Then
MsgBox("This file is normal and readonly.")
End If
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("C:\MYDIR")
If (MyAttr And FileAttribute.Directory) = FileAttribute.Directory Then
MsgBox("MYDIR is a directory")
End If
Комментарии
Чтобы определить, какие атрибуты заданы, используйте And оператор для побитового сравнения значения, возвращаемого GetAttr функцией, и значения отдельного атрибута файла. Если результат не равен нулю, этот атрибут задается для именованного файла. Например, возвращаемое значение следующего And выражения равно нулю Archive , если атрибут не задан:
Result = GetAttr(FName) And vbArchive
Если задан атрибут, возвращается ненулевое Archive значение.
