Como meto código asp en una plantilla..?

[angel_dope]

Muy wenas a todo el mundo una vez más. Voy a ver si explico lo que necesito: Estoy haciendo un sistema de envio de publicidad. Primero el usuario hace una búsqueda según unos criterios, y se manda un correo a todos los mails que salen al final de esa búsqueda. Hasta ahi ningún problema. Después, para cada producto, se usará una plantilla distinta, de echo se usarán distintas plantillas para un mismo producto. Y como esas plantillas las crearán en el propio departamento que usará esta aplicación, se me ocurrió que las podian crear con el word, guardarlas como html y subirlas al servidor, después, a la hora de hacer el envio, la aplicación lee el contenido de la plantilla que toca y manda un mail en html muy bonito Esto también funciona, y me ha venido genial, me ha quitado mucho trabajo de encima, ya que no tengo que hacer yo las plantillas cada vez que se les ocurra hacer un cambio.
Pero después quise meter otra cosa más. Al hacer la búsqueda, entre otros datos, se saca de la base de datos el cargo y el nombre de la persona de contacto, asi como el precio del producto y queria integrar esto en la plantilla, asi que intenté hacer la plantilla en html y en los sitios donde va el nombre, poner el codigo asp correspondiente para que apareciese el nombre, pero cuando manda el mail, lo que hace es sacar el código que yo le he puesto tal cual, no me coge las variables de la página Alguien sabe si podria hacer esto que yo quiero de alguna manera?? Os pongo el código tal y como está ahora:

Código PHP:

  'Creo la conexión con la base de datos
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\..\basesdatos\Publicom.mdb"))
 
Set Result=createobject("ADODB.Recordset")
Result.cursortype = AdOpenKeyset
Result.LockType = AdLockOptimistic
sql_Result = "Select * From Resultados"
Result.open sql_Result, conn
 
    do while not result.eof
        Set Precio=createobject("ADODB.Recordset")
        Precio.cursortype = AdOpenKeyset
        Precio.LockType = AdLockOptimistic
        sql_Precio = ""
        sql_Precio = "Select * From cons_precios WHERE idtipo=" & result.fields("Idtipo") &" AND idproducto=" & producto
        Precio.open sql_Precio, conn
 
        archivo = "tipo_" & result.fields("Idtipo") &"_prod_"& producto &".txt"
        direccion = Result.fields("mail")
 
        Dim FSO, oCarpeta, colFicheros, fichero, oFichero
        Dim texto
        
        set FSO = Server.CreateObject("Scripting.FileSystemObject")
        set oCarpeta = FSO.GetFolder("d:\datos\intranetweb\publicom\plantillas")
        set colFicheros = oCarpeta.Files
        
        'Recorremos la colección de ficheros (objetos File)
        for each fichero in colFicheros
            if fichero.Name = archivo then
                'Abro el fichero para lectura (ForReading)
                set oFichero = fichero.OpenAsTextStream(1)
                'Leo todo el fichero a una variable
                texto = oFichero.ReadAll
                'Cierro el fichero
                oFichero.Close
                set oFichero = nothing
            end if
    
        next 'fichero
    
        set colFicheros = nothing
        set oCarpeta = nothing
        set FSO = nothing
 
    
        ' CDO mail object
            Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
            
            ' CDO mail settings
                with objCDOMail
                    .BodyFormat = cdoBodyFormatHTML
                    .MailFormat = cdoMailFormatMIME
                    .Body = Texto
                    .Subject = "Pruebas Publicom"
                    .From = "[email protected]"
                                        .Bcc = direccion
                    '.Cc = strCC                
                    .MailFormat = 0            
                    '.AttachFile ThisFile
                    .Send
                end with
        
            ' destroy object, free memory
            set objCDOMail = nothing        
 
'        Precio.close
    result.movenext
    loop 
%> 
   

Y la plantilla es lo siguiente, en una pagina html:

Estimado <%=nombre%> te presentamos nuestro último producto. Precio: <%=precios%>

He probado de mil maneras diferentes, con comillas, concatenando, metiendole de todo al html, pero siempre me saca todo el texto tal cual.
Espero que alguien pueda ayudarme, muchas gracias por adelantado a tod@s, salu2