VBS用FSO改变文件属性

在框架的执行中,我们会碰见这样的情况,从代码库里下来的文件属性都是只读的,在运行的时候就没办法对其操作,我们可以通过以下方式来改变文件的属性:

1
2
3
Set fso = CreateObject( "Scripting.FileSystemObject" )
fso.GetFile(LogFilePath).Attributes = 0
Set fso = Nothing

Attributes
Normal 0 普通文件。没有设置任何属性。
ReadOnly 1 只读文件。可读写。
Hidden 2 隐藏文件。可读写。
System 4 系统文件。可读写。
Directory 16 文件夹或目录。只读。
Archive 32 上次备份后已更改的文件。可读写。
Alias 1024 链接或快捷方式。只读。
Compressed 2048 压缩文件。只读。搜索

如果相应用多种属性,只须把它们的值加起来。

唐胡璐 wechat
欢迎您扫一扫上面的微信公众号,订阅我的博客!
分享创造价值,您的支持将鼓励我继续前行!