<%
Option Explicit
Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")
ObjMail.Send "bob@na.com", "tom@na.com", "Wiadomo testowa", _
  "Tekst wiadomoci!", 2
Set objMail = Nothing
%>
