E-mails versturen via CDONTS

Door Tom Vergote
30 maart 2001

Een e-mail versturen in ASP is geen zware opdracht, het enige wat je nodig hebt is CDONTS (automatisch geïnstalleerd met de SMTP service van IIS 4.0/5.0). Je kan ook een gratis component installeren op de server zoals ASPmail van Server Objects of SMTPmail van Software Artisans (gebruikt op deze site).

Hier zal ik tonen hoe je mails verstuurt via de CDONTS (CDO staat voor Collaboration Data Objects, NTS voor NT Server) omdat deze voor iedereen beschikbaar is en de werkwijze voor een component gelijklopend is.

Eerst moet je een instantie van het CDONTS aanmaken, dit gebeurt als volgt:
<%
Option Explicit

Dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
%>

De methodes en eigenschappen van dit object zijn voor de hand liggend, zoals blijkt uit de verdere code:
<%
objCDOMail.To = "iemand@mijnsite.com"   'de bestemming
objCDOMail.From = "mailscript@mijnsite.com"   'de afzender
objCDOMail.cc = "info@mijnsite.com"   'carbon copy

Dim txtBody
txtBody = "Deze email werd verstuurd door een asp-script dat gebruik maakt van CDONTS"

objCDOMail.Subject = "CDONTS"   'het onderwerp
objCDOMail.Body = txtBody   'de inhoud
objCDOMail.Send   'de email versturen
%>

Tot zo ver is alles redelijk eenvoudig, maar er is nog meer!
<%
objCDOMail.AttachFile("c:\wwwroot\mijnsite\mailscript.asp", "mailscript.asp")
objCDOMail.Bcc("geheim@mijnsite.com")
objCDOMail.Importance = 1
%>

Ook dit is vanzelfsprekend. De eerste regel specificeert een bijlage, de tweede een blind carbon copy en de laatste regel geeft de prioriteit aan (indien niet bepaald = 1).

Prioriteit:
0 -> laag
1 -> normaal
2 -> hoog

Bijlage: ("pad_naar_het_bestand", "naam")
De 2e parameter is optioneel en geeft de naam aan die verschijnt in de email (niet noodzakelijk de echte bestandsnaam).

Zo dit is het, meer komt er niet bij kijken. Nu kunt u eindelijk dat scriptje schrijven die om bevestiging vraagt na inschrijving in een mailinglist, of welke toepassing dan ook. Het spreekt voor zich dat deze code kan uitgebreid worden om de gegevens uit een databank of formulier te halen.

Als u beslist een component te installeren raad ik aan even de handleiding ervan door te nemen, maar je zal zeker merken dat het principe gelijk blijft.