Hente fil ind i streng

Eks:

Set fso = CreateObject("Scripting.FileSystemObject")
filename="c:\test\test.txt"
Set f = fso.OpenTextFile(filename,1,false,0)
str =  f.ReadAll
response.write str

??? Jeg tror du har misforstået spørgsmålet...eller at jeg har formuleret mig forkert.

Det handler om en ASP-fil der skal afvikles INDEN den trækkes ind i variablen !

vil du afvilke en ASP fil ... Så kan du bruge.:

Server.Execute ("fil.asp")

filename=Server.Execute ("fil.asp") ? Er det sådan du mener ?

Det handler om at jeg til en HTMLemail vil sende en sap-side ud, men når jeg trækker den ind via fso kommer aps-kommandoerne jo med !

Hvis du vil genenrere HTML siden som skal sendes i en email kan du lave en ASP side der skriver html filen i et tmp dir og bagefter attacher du den til mailen, dette kan godt laves på samme side, bare vær opmærksom på at html filen genereres med writeln istedet for response.write. (du kan ikke lave html tags ved  %><head><%

Den skal ikke attaches, men være en HTMLmail

'Indlæser i en streng.:
Set fso = CreateObject("Scripting.FileSystemObject")
filename="fil.asp"
Set f = fso.OpenTextFile(filename,1,false,0)
str =  f.ReadAll

Det findes så en execute som skulle kunne afvilke koden prøv med:

nystr = Execute(str)

Prøv om det virker men jeg er ikke sikker..

Så skal du blot opbygge tekststrengen i din asp kode.
Ex. på en tekst oprettet udfra et db opslag.
dim mailText
mailText = "<html><head><title>Dette er en test mail</title></head><body>"
do until rs.eof
  mailText = mailText & "<br>Et dynamisk element: "& rs("element")
loop
mailText = mailText & "</body></html>"