oFSO = CREATEOBJECT("Scripting.FileSystemObject") oFile = oFSO.GetFile(lcfile) && lcfile is the name of the file * Turn on the read-only bit oFile.Attributes = BITOR(oFile.Attributes, 0x01) * Turn off the read-only bit oFile.Attributes = BITAND(oFile.Attributes, 0xFE)