Mail da template con CDONTS
Valutazione attuale: 5 / 5
Non è raro che il testo di un'e-mail da generare automaticamente sia scritto all'interno dello script.
Si tratta di un approccio giusto, ma non comodissimo dal punto di vista della praticità: per cambiare la forma dell'e-mail dovremo andare ad intervenire sullo script.
Una soluzione potrebbe essere quella di utilizzare un template esterno, composto da segnaposto sostituilbili a runtime.
Ecco un esempio:
Si tratta di un approccio giusto, ma non comodissimo dal punto di vista della praticità: per cambiare la forma dell'e-mail dovremo andare ad intervenire sullo script.
Una soluzione potrebbe essere quella di utilizzare un template esterno, composto da segnaposto sostituilbili a runtime.
Ecco un esempio:
Caro ##NOME##,
grazie per il tuo ordine, che invieremo all'indirizzo ##INDIRIZZO##.
Per qualsiasi informazione ti contatteremo all'indirizzo ##EMAIL##.
Ci basterà salvare questo file come ordine.txt ed inserirlo nella stessa directory dello script che segue, che preleverà i parametri dalla form e li invierà via posta:
<%
Set FSO=CreateObject("Scripting.FileSystemObject")
set instream = Fso.OpenTextFile(Server.MapPath("ordine.txt"))
Messaggio = instream.ReadAll
instream.Close
set instream = nothing
set FSO = nothing
'replace
Messaggio = Replace(Messaggio, "##EMAIL##", request("email"))
Messaggio = Replace(Messaggio, "##NOME##", request("nome"))
Messaggio = Replace(Messaggio, "##INDIRIZZO##", request("indirizzo"))
'CDONTS
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.Send "mittente@dominio", "destinatario@dominio", "ordine", Messaggio, 0
Set objMail = nothing
%>