GetAttr 函数

返回一个用于表示文件类型、卷名称或目录名称的位模式。

语法:


GetAttr (Text As String)

返回值:

整数

参数:

Text」: 含有明确文件规格的任意字符串表达式。也可以使用 URL 表示法

此函数确定指定文件的属性并返回位模式,借助位模式可以识别以下文件属性:

错误代码:

5 无效的过程调用

53 未找到文件

数值

已命名常量

定义

ATTR_NORMAL

0

普通文件。

ATTR_READONLY

1

只读文件。

ATTR_HIDDEN

2

隐藏的文件

ATTR_SYSTEM

4

系统文件

ATTR_VOLUME

8

返回卷的名称

ATTR_DIRECTORY

16

仅返回目录名称。

ATTR_ARCHIVE

32

上一次备份后文件已被修改 (存档位)。


如果要了解是否设置了属性字节的各个位,请使用以下查询方法:

示例:


Sub ExampleSetGetAttr
On Error GoTo ErrorHandler ' 定义错误处理程序的目标
 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" )
 End
ErrorHandler:
 Print Error
 End
End Sub

请支持我们!