<%
const nome_file="tuo percorso"
set fs=createobject("scripting.Filesystemobject")
set a=fs.opentextfile(nome_file,1, False)

da_cercare="stringa che vuoi cercare"

do while not a.atendofstream
strings(i)=a.readline
loop
a.close

Set a = fs.CreateTextFile(nome_file,True)
for n=0 to i-1
strings(n)=Replace(strings(n),"stringa da cercare", " ")
a.WriteLine( Strings(n))
Next
a.Close
Set fs = Nothing
%>

Non sono sicura che funzioni l'ho fatta così al volo, cmq fammi sapere :-)