Scrivere un file .asp - errore con carattere percentuale

[biblo]

In che modo si può scrivere in un file .asp il carattere % senza che dia errore?

Lo script

Dim FileObject
Set FileObject=Server.CreateObject("Scripting.FileSyst emObject")
'SCRIVO SU PROVA.TXT DATA ED ORA
Set OutStream=FileObject.CreateTextFile(Server.MapPath ("../public/aspetto_home_"&request("tabella_txt")&".asp"),true ,0)
Outstream.WriteLine "<% aspetto_home_"&request("tabella_txt")&"="&request( "aspetto")
Outstream.WriteLine "%>"
OutStream.Close
Set OutStream=Nothing
Set FileObject=Nothing

L'errore:

Microsoft VBScript compilation error '800a0409'

Unterminated string constant

/intro.asp, line 8

Outstream.WriteLine "
---------------------^

[deleted_c]

sembra tutto ok...
comincia con lo staccare le & dagli altri caratteri e vediamo che succede

[biblo]

stessa cosa,
non esiste un codice per scrivere il carattere % senza digitarlo dirattamente... o qualcosa del genere, l'errore lo da solo quando arriva alla chiusura del file .asp qualsiasi cosa metto prima, si ferma quando arriva a %>
...

[Roby_72]

Prova così:

corpo=corpo &"<" & "%"


Roby