如何修改文件夹属性

[ayou]

属性中的系统属性应怎样把勾勾上

[知行职场-雷曼]

用SHELL可以吗？

[shines77]

好像用SetAttr语句就可以了，具体用法为：

SetAttr "OBJDIR", vbSystem

OBJDIR为目标目录的路径即目录名。

例如: SetAttr "C:\Program Files", vbSystem

[shines77]

SetAttr 语句为一个文件设置属性信息。

语法

SetAttr pathname, attributes

SetAttr 语句的语法含有以下这些命名参数：

部分 描述

pathname 必要参数。用来指定一个文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。
Attributes 必要参数。常数或数值表达式，其总和用来表示文件的属性。
设置值

attributes 参数设置可为：

常数 值 描述

vbNormal 0 常规（缺省值）
vbReadOnly 1 只读
vbHidden 2 隐藏
vbSystem 4 系统文件
vbArchive 32 上次备份以后，文件已经改变

注意 在程序代码中的任何位置，可以使用这些常数来替换真正的数值。