Hi Ben....
It looks like CDOSYS is instaled... therfore, the following should work:-
- Code: Select all
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDOSYS"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.TextBody="This is a message."
myMail.Send
%>
You may need to specify an SMTP server for the mail to go via if the above doesnt work. If not, use this
- Code: Select all
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.TextBody="This is a message."
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="smtp.server.com" 'PUT YOURS HERE
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
myMail.Configuration.Fields.Update
myMail.Send
%>
This should get you going.