IBM Lotus Symphony
|
ファイルタイプ、ボリューム名、またはディレクトリ名を識別するビットパターンを返します。
GetAttr (Text As String)
整数
Text: 明確なファイル指定が入っている任意の文字列式。 URL 表記を使用することもできます。
この関数は、指定されたファイルの属性を判別し、以下のファイル属性の識別に役立つビットパターンを返します。
0 : 通常のファイル。
1 : 読み取り専用ファイル。
8 : ボリューム名を返します。
16 : ディレクトリ名のみを返します。
32 : ファイルは前回のバックアップの後に変更されています (Archive ビット)。
属性バイトのビットがセットされているかどうかを知りたい場合は、以下の照会メソッドを使用します。
Sub ExampleSetGetAttr
On Error Goto ErrorHandler REM Define target for error-handler
If Dir("C:¥test",16)="" Then MkDir "C:¥test"
If Dir("C:¥test¥autoexec.sav")="" THEN Filecopy "c:¥autoexec.bat", "c:¥test¥autoexec.sav"
SetAttr "c:¥test¥autoexec.sav" ,0
Filecopy "c:¥autoexec.bat", "c:¥test¥autoexec.sav"
SetAttr "c:¥test¥autoexec.sav" ,1
print GetAttr( "c:¥test¥autoexec.sav" )
終了
ErrorHandler:
Print Error
終了
end sub