Una semplice form con cui inviare delle mail.
<html>
<body>
<%
If request("Button")="Invia" then
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From=request("Address")
CorpoMessaggio="Grazie" & request("Nome") & request("Cognome") & "per aver letto il mio articolo"
objMail.Body=CorpoMessaggio
objMail.To="DESTINATARIO"
objMail.Subject="OGGETTO_MAIL"
objMail.Send
set objMail = nothing
response.write "E-mail Inviata"
else
%>
<form action="FormMail.asp" method="POST" name="CDOEMAIL">
Nome: <input type="text" size="20" name="Nome"><br>
Cognome:<input type="text" size="20" name="Cognome"><br>
E-mail: <input type="text" size="20" name="Address"><br>
<input type="submit" name="Button" value="Invia">
</form>
<%
End if
%>
</body>
</html>
Scarica il Codice...
Stampa la pagina