gregmat
13/06/2015, 09h22
En effet ce composant n'est pas installé sur les mutus Windows.
il faut utiliser l'objet CDONTS.
il faut utiliser l'objet CDONTS.
Code:
Set Mailer = Server.CreateObject("CDONTS.NewMail") Mailer.Importance = 0 ' importance : 0 = normal, 1 = urgent, 2 = très urgent Mailer.AttachFile "fichier.jpg","nomdufichier" ' piece jointe Mailer.Cc = "email" ' carboncopy Mailer.BCc = " email " ' BlindCarbonCopy Mailer.BodyFormat = 0 '0 pour format HTML --- 1 pour PlainText Mailer.MailFormat = 0 '0 pour format HTML --- 1 pour PlainText Mailer.To = "email" ' email du destinataire Mailer.From = "email" ' email de l'expediteur Mailer.Subject = "objet" ' objet du mail Mailer.Body = "" ' corpshtml du message Mailer.Send ' on envoie Set Mailer = Nothing ' fermer, important.