Ho scritto CDOSYS ma mi dice ugualmente:
codice:
Microsoft VBScript runtime error '800a01ad'
ActiveX component can't create object: 'CDOSYS.Newmail'
/mail.asp, line 2
Questo è il mio codice... autatemi
codice:
<%
Set link = CreateObject("CDSYS.Newmail")
link.From = request.form("email")
link.To = request.form("destinatario")
link.Subject = "Segnalaizone sito"
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 <% Response.Write("destinatario")%>
</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.Form ("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>