Salve
ho tentato di guardarmi le precedenti discussioni ma essendo piuttosto acerba in ASP non so proprio cosa sbaglio o cosa ometto.

Sto cercando di inviare con ASP una richiesta di contatto ma mi da questo errore:

Microsoft VBScript runtime error '800a01ad'
ActiveX component can't create object: 'CDONTS.Newmail'
/mail.asp, line 2

il codice che sto utilizzando è il seguente

Pagina contenente la form in HTML
codice:
<html>
<head>
<title>invio_mail_asp</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#ffcb8c">
<div align="center">
  <center>
  <table border="0" cellpadding="0" cellspacing="0" width="90%">
    <tr>
      <td width="100%">
<form name="form1" method="post" action="mail.asp">
  

<font face="Verdana" size="1">Invio di mail da parte dell'utente che visita
  il sito, utilizzando ASP</font></p>
  <table width="361" border="0" cellspacing="0" cellpadding="0">
    <tr> 
      <td width="170"><font face="Verdana" color="#996633" size="1">Nome:</font></td>
      <td width="191">
        <font face="Verdana" size="1">
        <input type="text" name="nome">
        </font>
      </td>
    </tr>
    <tr> 
      <td width="170"><font face="Verdana" size="1" color="#996633">il 
        tuo indirizzo e-mail:</font></td>
      <td width="191">
        <font face="Verdana" size="1">
        <input type="text" name="email">
        </font>
      </td>
    </tr>
    <tr>
      <td width="170"><font face="Verdana" size="1" color="#996633">un 
        commento:</font></td>
      <td width="191">
        <font face="Verdana" size="1">
        <textarea name="mex" rows="5" cols="33" wrap="VIRTUAL"></textarea>
        </font>
      </td>
    </tr>
  </table>
  

 
    <font face="Verdana" size="1"> 
    <input type="submit" name="Submit" value="Invia il Commento">
    <input type="reset" name="reset" value="Cancella">
    </font>
  </p>
</form>
        

</td>
    </tr>
  </table>
  </center>
</div>
</body>
</html>
Pagina di invio in ASP
codice:
<%
Set link = CreateObject("CDONTS.Newmail")
link.From = request.form("email")
link.To = "monigna82@hotmail.com"
link.Subject = "Mail blog"
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">&quot;<%Response.Write(request.Form ("mex"))%>&quot;</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>
Qualcuno può dirmi cosa posso fare?