| <% |
| set objMessage = createobject("cdo.message") |
| set objConfig = createobject("cdo.configuration") |
| Set Flds = objConfig.Fields |
|
| Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 |
| Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="m##.internetmailserver.net" |
|
|
| Flds.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 |
| Flds.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") ="[email protected]" |
| Flds.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") ="password" |
|
| Flds.update |
| Set objMessage.Configuration = objConfig |
| objMessage.To = "[email protected]" |
| objMessage.From = "[email protected]" |
| objMessage.Subject = "CDO mail test" |
| objMessage.fields.update |
| objMessage.HTMLBody = "This is a test sent from CDO using smtp authentication." |
| objMessage.Send |
| %> |
If you run in to problems using this code, please post in our
community forum. Technical support cannot assist with specific coding related issues.
Article ID: 617, Created: 8/14/2009 at 2:35 PM, Modified: 2/28/2024 at 3:40 PM