lato server ho un file di testo composto da varie righe che iniziano con la lettera a o con p.
con asp devo aprire il file, fare un loop sulle righe e cancellare quelle che iniziano con A.
Finora ho scritto:

Dim FileObject
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set OutStream=FileObject.OpenTextFile("prova.txt",2,true)

Do while not OutStream.AtEndOfStream
testo=OutStream.ReadLine
If Mid(testo, 1, 1)="A" then
testo=""
OutStream.WriteLine("")
end if
loop

OutStream.Close
Set OutStream=Nothing
Set FileObject=Nothing

con questo codice mi da errore sulla riga del do while per "metodo non consentito".
ho provato a sostituire il paramentro dell'apertura file "2" con "1" e con "8", ma mi da comunque errori.
vorrei sapere come posso fare per risolvere queto errore, ma soprattutto per riuscire a cancellare le righe che iniziano con A(penso che il codice che ho scritto anche senza quell'errore non funzioni...)