Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- new paste
- removals
- 1
- <%Set myMail=CreateObject(“CDO.Message”)‘E-mail subject:myMail.Subject=”Sending email with CDO”‘The from address:myMail.From=”from@example.com”‘The to address:myMail.To=”to@example.com”‘Text:myMail.TextBody=”Your text goes here when sending e-mails”myMail.Configuration.Fields.Item _ (“http://schemas.microsoft.com/cdo/configuration/sendusing”)=2‘Outgoing SMTP server, localhost in this case:myMail.Configuration.Fields.Item _ (“http://schemas.microsoft.com/cdo/configuration/smtpserver”)= “localhost”‘Outgoing SMTP port, 25 for SMTP:myMail.Configuration.Fields.Item _ (“http://schemas.microsoft.com/cdo/configuration/smtpserverport”)=25myMail.Configuration.Fields.Update‘Send the E-mail:myMail.Send set myMail=nothing%>
- This paste expires on 2017-10-12 19:52:42. View raw. Remove now (Why am I seeing this?) Pasted through web.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement