problema invio form

**fbdesign** · 20-11-2006, 15:15

Voglio fare un form di invio ma mi da errore alla linea 16 (Set objMail = Server.CreateObject("CDONTS.NewMail")):
Tipo di errore:
Oggetto Server, ASP 0177 (0x800401F3)
Stringa dell'interfaccia non valida.
/corso_asp/formmail.asp, line 16
Sapete cosa sbaglio?
So che esiste un componente gratuito nn presente su win xp, è questo il problema?
Se si come faccio ad installarlo?

grazie

codice:

<html>
<head>
<title> Invio di una e-mail da una form </title>
</head>
<body">


<%


'Se alla pagina viene inviata la form con i dati...


if Request.Form("invia_btn") = "INVIA" then
  Dim Mail
  Set objMail = Server.CreateObject("CDONTS.NewMail")
  objMail.From= Request.Form("mittente")
  objMail.To         = Request.Form("destinatario")
  objMail.Subject    = Request.Form("oggetto")
  objMail.Body       = Request.Form("messaggio")
  objMail.Importance = 1
  objMail.Send()           'invia la e-mail
  Set objMail = nothing
  Response.Write "<CENTER><H2>E-mail inviata!<H2></CENTER>"
else


'altrimenti visualizza la Form


%>



<h1><center>Form per invio e-mail</center></h1>

<form action=formmail.asp method=post>

  <table border=1 align=center>
    <tr>
      <td>
      MITTENTE
      </td>
      <td>
      <input type="text" name="mittente" size="30" maxlength="30">

      </td>
    </tr>
    <tr>
      <td>
      DESTINATARIO
      </td>
      <td>
      <input type="text" name="destinatario" size="30 maxlength="30">

      </td>
    </tr>
    <tr>
      <td>
      OGGETTO
      </td>
      <td>
      <input type="text" name="oggetto" size="30" maxlength="30">

      </td>
    </tr>
    <tr>
      <td colspan=2 align=center>
      MESSAGGIO

      <textarea name="messaggio" rows="8" cols="42"></textarea>
      </td>
    </tr>
    <tr>
      <td colspan=2 align=center>
      <input type="submit" name="invia_btn" value="INVIA">
      </td>
    </tr>
  </table>
</form>


<%
end if
%>


</body>
</html>

**Mems** · 20-11-2006, 15:21

Non c'è CDONTS sul pc che fa da server.

**fbdesign** · 20-11-2006, 15:27

Originariamente inviato da Mems
Non c'è CDONTS sul pc che fa da server.

OK come posso risolvere?

**fbdesign** · 20-11-2006, 15:51

Ho trovato un articolo che dice:
Che cosa è CDONTS:
Abbiamo detto che si tratta di una libreria di Windows NT, 2000 e XP Professional, in particolare è una collezione di Oggetti che permettono di inviare e ricevere email utilizzando servizi nativi di Windows.

Installazione
Se possediamo Win 2000 o Xp PRO il server SMTP è già installato

Quindi avendo io win xp professional dovrei averlo installato....

**Lak3d** · 20-11-2006, 15:54

cerca cdosys.dll...
Se ce l'hai cercati qualche esempio per quell'oggetto.

**fbdesign** · 20-11-2006, 15:59

Originariamente inviato da Lak3d
cerca cdosys.dll...
Se ce l'hai cercati qualche esempio per quell'oggetto.

Si ci sono. perchè dici di cercarmi degli esempi, quello postato nn è corretto?

**Lak3d** · 20-11-2006, 16:04

se non lo hai o lo scarichi o usi il cdosys... sono entrambi il cuore su cui è costruito Outlook Express (credo...)
Se fai una ricerca con Google o in questo stesso forum trovi centinaia di esempi.

**fbdesign** · 20-11-2006, 16:38

ok ho modificato l'oggetto e relativa sintassi, mi dice che l'e mail è stata inviata correttamente ma nn mi arriva niente...

me lo testate?

codice:

<html>
<head>
<title> Invio di una e-mail da una form </title>
</head>
<body">


<%


'Se alla pagina viene inviata la form con i dati...


if Request.Form("invia_btn") = "INVIA" then
  Dim Mail
  Set objMail = Server.CreateObject("CDO.Message")
  objMail.From = Request.Form("mittente")
  objMail.To = Request.Form("destinatario")
  objMail.Subject = Request.Form("oggetto")
  objMail.HTMLBody = Request.Form("messaggio")
  objMail.Send()           'invia la e-mail
  Set objMail = nothing
  Response.Write "<CENTER><H2>E-mail inviata!<H2></CENTER>"
else


'altrimenti visualizza la Form


%>



<h1><center>Form per invio e-mail</center></h1>

<form action=formmail.asp method=post>

  <table border=1 align=center>
    <tr>
      <td>
      MITTENTE
      </td>
      <td>
      <input type="text" name="mittente" size="30" maxlength="30">

      </td>
    </tr>
    <tr>
      <td>
      DESTINATARIO
      </td>
      <td>
      <input type="text" name="destinatario" size="30 maxlength="30">

      </td>
    </tr>
    <tr>
      <td>
      OGGETTO
      </td>
      <td>
      <input type="text" name="oggetto" size="30" maxlength="30">

      </td>
    </tr>
    <tr>
      <td colspan=2 align=center>
      MESSAGGIO

      <textarea name="messaggio" rows="8" cols="42"></textarea>
      </td>
    </tr>
    <tr>
      <td colspan=2 align=center>
      <input type="submit" name="invia_btn" value="INVIA">
      </td>
    </tr>
  </table>
</form>


<%
end if
%>


</body>
</html>

**fbdesign** · 20-11-2006, 17:46

ragà una mano per favore!!

**Mems** · 20-11-2006, 17:49

CDONTS si trova su windows 2000 pro e server
su xp e server 2003 ci trovi CDOSYS
cerca su internet dove scaricare la dll di cdonts e installartela su xp.

Discussione: problema invio form

Strumenti discussione

Ricerca discussione

Visualizza

problema invio form

Permessi di invio