<%@ Language=VBScript %>
<%
Set newMailObj = CreateObject("CDONTS.Newmail")
recipStr = "steven@webcaddy.com.au"
fromStr = "webcam@webcaddy.com.au"
newMailObj.To = recipStr
newMailObj.From = fromStr
newMailObj.Subject = "Fantum Mail!"
newMailObj.Body = "Here's some email for you - Again"
newMailObj.Send
Set newMailObj = Nothing
%>
Sent mail to <%=recipStr%>
Mail from: <%=fromStr%>