inviare una e-mail

sintassi CDONTS:


objNewMail.Send([From][, To][, Cc][, Bcc][, Subject][, Body][, Importance] )

objNewMail
   Obbligatorio. Questo &grave; l'oggetto NewMail.

From
   Facoltativo. L'indirizzo completo che identifica il mittente
   (Es. stracca@stracca.net)

To
   Facoltativo. Una lista di tutti gli indirizzi completi dei destinatari.
   Ogni singolo indirizzo deve essere separato da una virgola ",".
   (Es. stracca@stracca.net)

Cc
   Facoltativo. Una lista di tutti gli indirizzi completi dei destinatari
   a cui la mail deve essere spedita per Conoscenza.
   Ogni singolo indirizzo deve essere separato da una virgola ",".
   (Es. stracca@stracca.net)

Bcc
   Facoltativo. Una lista di tutti gli indirizzi completi dei destinatari
   a cui la mail deve essere spedita per Conoscenza Nascosta.
   Ogni singolo indirizzo deve essere separato da una virgola ",".
   (Es. stracca@stracca.net)

Subject
   Facoltativo. L'oggetto del messaggio.

Body
   Facoltativo. Il testo della mail.

Importance
   Facoltativo. La priorità di spedizione della mail: Alta, Normale, Bassa.

Lo script si basa su 2 files:
- sendmail.html
- sendmail.asp

Il file sendmail.html


<html>
  <body>
    <form method="post" action="sendmail.asp">
      Indirizzo mittente: 
      <input type="text" name="mailfrom" size="40"><br>
      Indirizzo destinatario: 
      <input type="text" name="mailto" size="40"><br>
      Indirizzo destinatario per conoscenza: 
      <input type="text" name="mailcc" size="40"><br>
      Indirizzo destinatario per conoscenza nascosta: 
      <input type="text" name="mailbcc" size="40"><br>
      Priorità: 
      <input type="radio" name="mailpriorita" value="2">alta 
      <input type="radio" checked name="mailpriorita" value="1">normale 
      <input type="radio" name="mailpriorita" value="0">bassa<br>
      Oggetto: 
      <input type="text" name="mailoggetto" size="40"><br>
      Testo:<br>
      <textarea rows="10" name="mailtesto" cols="60"></textarea><br>
      <input type="submit" value="Invia" name="b1"> 
      <input type="reset" value="Annulla" name="b2">
    </form>
  </body>
</html>

Il file sendmail.asp


<% Option Explicit %>
<html>
<body>
<%
Dim objEMail
Dim sMittente 
Dim sDestinatario 
Dim sDestinatarioConoscenza 
Dim sDestinatarioCNascosta 
Dim sOggetto 
Dim sTesto 
Dim lPriorita 

sMittente = Request.Form("MailFrom")
sDestinatario = Request.Form("MailTo")
sDestinatarioConoscenza = Request.Form("MailCc")
sDestinatarioCNascosta = Request.Form("MailBcc")
lPriorita = Request.Form("MailPriorita")
sOggetto = Request.Form("MailOggetto")
sTesto = Request.Form("MailTesto")

Set objEMail = Server.CreateObject("CDONTS.NewMail")
objEMail.From = sMittente
objEMail.To = sDestinatario
objEMail.Cc = sDestinatarioConoscenza
objEMail.Bcc = sDestinatarioCNascosta
objEMail.Subject = sOggetto
objEMail.Body = sTesto
objEMail.importance = lPriorita
objEMail.BodyFormat = 1
objEMail.MailFormat = 1
objEMail.Send
Set objEMail = Nothing
%>
Email inviata!
</body>
</html>

Per spedire E-Mail in formato HTML si devono specificare le due seguenti impostazioni:


objEMail.BodyFormat = 0
objEMail.MailFormat = 0