guardar BinaryWrite

[Ascariz]

buenas

Lo que hago es sacarlo de un correo que esta en Binary

' lo saco por pantalla
Response.BinaryWrite( email.GetMbPlainTextBody("utf-8"))

' lo guardo en una variable
dim texto
texto = email.GetMbPlainTextBody("utf-8")

' lo mismo pero en un a session
session("email") = cstr(texto)

' lo mismo pero en un fichero
dim fs, f
set fs=Server.CreateObject("Scripting.FileSystemObject ")
response.Write(Server.MapPath("/")&"\1.txt")
set f=fs.CreateTextFile(Server.MapPath("/")&"\1.txt",true)

f.Write(texto)
' ME DA UN ERROR
'Argumento o llamada a procedimiento no válidos

f.Close
set f=nothing
set fs=nothing