VBS用FSO改变文件属性

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

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 压缩文件。只读。搜索

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