FileSystem.GetAttr メソッド
アセンブリ: Microsoft.VisualBasic (microsoft.visualbasic.dll 内)

Dim PathName As String Dim returnValue As FileAttribute returnValue = FileSystem.GetAttr(PathName)
戻り値
値 Normal、定数 vbNormal、説明 通常。値 ReadOnly、定数 vbReadOnly、説明 読み取り専用。値 Hidden、定数 vbHidden、説明 非表示。値 System、定数 vbSystem、説明 システム ファイル。値 Directory、定数 vbDirectory、説明 ディレクトリまたはフォルダ。値 Archive、定数 vbArchive、説明 ファイルは前回のバックアップ以降に変更されています。値 Alias、定数 vbAlias、説明 ファイルに別の名前が付いています。

詳細については、Visual Basic のトピック「GetAttr 関数」を参照してください。
設定されている属性を特定するには、And 演算子を使用して、GetAttr 関数によって返される値と、対象の個別ファイル属性値をビットごとに比較します。結果が 0 以外の場合、その属性がファイルに設定されています。たとえば、次の And 式で Archive 属性が設定されていない場合、戻り値は 0 です。
Result = GetAttr(FName) And vbArchive

この例では、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

Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition
開発プラットフォームの中には、.NET Framework によってサポートされていないバージョンがあります。サポートされているバージョンについては、「システム要件」を参照してください。


FileSystem クラス
FileSystem メンバ
Microsoft.VisualBasic 名前空間
IOException Class
FileNotFoundException Class
その他の技術情報
GetAttr 関数
And 演算子 (Visual Basic)
FileAttr 関数
SetAttr 関数
FileAttribute 列挙型
Visual Basic におけるファイル、ディレクトリ、およびドライブのプロパティ
Weblioに収録されているすべての辞書からFileSystem.GetAttr メソッドを検索する場合は、下記のリンクをクリックしてください。

- FileSystem.GetAttr メソッドのページへのリンク