[Iska]

O L E G, код, приведённый в #4, не самодостаточный (и, увы, к тому же, содержит грубое упущение; приведённая ошибка связана не с ней). Он просто иллюстрирует, как можно:

Указать сразу не сколько файлов, с которых мне нужно снять аттрибут »

Я полагал, что Вы уже освоились в WSH.

Вот пример полного кода:

Код:

Option Explicit

Const ReadOnly = &H01

Dim strFile

With WScript.CreateObject("Scripting.FileSystemObject")
	For Each strFile In Array("C:\qwerty.txt", "c:\Temp\01.txt", "d:\02\02.log")
		If .FileExists(strFile) Then
			With .GetFile(strFile)
				WScript.Echo strFile
				
				.Attributes = .Attributes And Not ReadOnly
			End With
		End If
	Next
End With

WScript.Quit 0