Modificacion de archivos con FSO

[javopereira]

lo que tenes que hacer es levantarlo en una variable, reemplazarle loq ue sea preciso y volverlo a escribir.
[codigo]

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set sfiles = FSO.getFolder(PathHDRR & PathHTML )
Set sfiles = sfiles.files

for each sfile in sfiles
'Response.Write sfile.name & "<br>"
'le cambio el atributo para escritura
'set oFile = FSO.getfile(PathHDRR & PathHTML & sFile.name)
set oFile = FSO.getfile(sFile)
oFile.Attributes = 0
'oFile.close
set oFile = nothing

'levanto el contenido del html
Set oFile = FSO.OpenTextFile(PathHDRR & PathHTML & sFile.name,1)
cContent = oFile.ReadAll
oFile.close
set oFile = nothing

cContent = replace(cContent, sBuscar, sReemplazar)
Set oFile = FSO.OpenTextFile(PathHDRR & PathHTML & sFile.name,2)
oFile.Write(cContent)
oFile.close
set oFile = nothing
next
[/codigo]

Aca lo hace con un HTML, pero para el caso es lo mismo.

Saludos.