Ao criar um arquivo com FSO, o retorno é um objeto Textstream ...
Quando o FSO deseja definir as propriedades de um arquivo ou pasta, o que você deve obter é um arquivo ou objeto de pasta.
Faça um arquivo.
<%
'Crie um exemplo de um objeto FileSystemObject
Set myfileObject = server.createObject (scripting.filesystemobject)
'Crie um exemplo de um objeto de arquivo
Definir myFile = myFileObject.getFile (Server.mappath (1.txt))
'Defina suas propriedades como somente leitura
Myfile.attributes = 1
%>