Цитата O L E G:
|
как снять аттрибут (чтение) с файла, »
|
Атрибута «чтение» не существует в природе. Есть атрибут «ReadOnly», в просторечии именуемый атрибутом «Только для чтения»:
File Attribute Constants.
Для чтения/установки атрибутов в WSH используется свойство «.Attributes» (
Attributes Property):
Код:
Option Explicit
Const ReadOnly = &H01
Dim objFSO
Dim objFile
Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile("C:\qwerty.txt")
' Очистить атрибут «ReadOnly»
objFile.Attributes = objFile.Attributes And Not ReadOnly
' Установить атрибут «ReadOnly»
'objFile.Attributes = objFile.Attributes Or ReadOnly
Set objFile = Nothing
Set objFSO = Nothing
WScript.Quit 0
