es. di invio aspemail che utilizzavo:
una pagina html con un form che aveva come action questo script send.asp che segue, nel form erano inseriti tre campi.
Una pagina di conferma invio completava il tutto.
<%
nome=request.form("nome")
cognome=request.form("cognome")
email=request.form("email")
testo= testo & "nome: " & nome & chr(13)
testo= testo & "cognome: " & cognome& chr(13)
testo= testo & "email: " & email& chr(13)
testo= testo & chr(10) & chr(13)
Set Mail = Server.CreateObject("Persits.MailSender")
mail.host = "www.tuosito.com"
mail.from = email
mail.fromname = nome
mail.addaddress "tuamail@tuosito.com"
mail.subject = "account"
Mail.body = testo
Mail.IsHTML = False
on error resume next
Mail.Send
response.redirect("tuapagina.htm")
%>
dopo una manutenzione di aruba non ha più funzionato
Ora nel vademecum mette questo script
<%
Set link = CreateObject("CDONTS.Newmail")
link.From = request.form("email")
link.To = "info@iperserv.com"
link.Subject = "Mail creata da un server"
link.Body = request.form("mex")
link.Send
Set link = Nothing
%>
<html>
<head>
<title>inviata</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#ffcb8c">
<p align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#996633">Caro utente
<%Response.Write(request.Form ("nome"))%> ( hai lasciato questo indirizzo mail:</font><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#996633"><%Response.Write(request.Form ("email"))%>)
Grazie per aver scritto questo messaggio al Webmaster del sito
</font></p>
<table width="75" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#ffcb8c">
<tr>
<td>
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#996633">"<%Response.Write(request.For m ("mex"))%>"</font></div>
</td>
</tr>
</table>
<p align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#996633">Torna a trovarci!
</font></p>
</p>
</body>
</html>
ma non funzionaaaaa
ciao
Rispondi quotando