Hey there,
i have been using the original version of Web Wiz Mailing List (they have come out with another version since), and i am using this on quite a few of my sites.
I have had issues with AOL for a while, but believe i have it solved, after using a CDOSYS with authentication setting. But not having an AOL account myself, means i cannot be sure.
On one site in particular, i know that it is NOT working, and i cannot understand why - AOL receipients (and possibly OPtonline too) are not receiving my mails.
I aksed support to take a look , and see if anything seemed out of line, but after looking into it, they said that one cannot send to AOL via a script - its got to be via Outlook or Webmail.
Does this make sense to anyone? i cannot believe this is the case.
Does anyone have any inout on this? i really need to get this sorted.. i appreciate any assistance.
thanks
i have been using the original version of Web Wiz Mailing List (they have come out with another version since), and i am using this on quite a few of my sites.
I have had issues with AOL for a while, but believe i have it solved, after using a CDOSYS with authentication setting. But not having an AOL account myself, means i cannot be sure.
On one site in particular, i know that it is NOT working, and i cannot understand why - AOL receipients (and possibly OPtonline too) are not receiving my mails.
I aksed support to take a look , and see if anything seemed out of line, but after looking into it, they said that one cannot send to AOL via a script - its got to be via Outlook or Webmail.
Does this make sense to anyone? i cannot believe this is the case.
Does anyone have any inout on this? i really need to get this sorted.. i appreciate any assistance.
thanks
Code:
'Dimension variables
Dim objCDOSYSCon
'Create the e-mail server object
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
'Set and update fields properties
With objCDOSYSCon
'Out going SMTP server
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.domain.com"
'SMTP port
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
'CDO Port
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
'Timeout
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 'basic (clear-text) authentication
.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") ="[email protected]"
.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") ="XXXXXX"
.Fields.Update
End With
'Update the CDOSYS Configuration
Set objCDOSYSMail.Configuration = objCDOSYSCon
With objCDOSYSMail
'Who the e-mail is from
.From = strWebsiteName & " <" & strWebsiteEmailAddress & ">"
'Who the e-mail is sent to
.To = " " & " <" & strEmailAddress & ">"
'The subject of the e-mail
.Subject = strSubject
'Send the e-mail
.Send
End with
'Close the server mail object
Set objCDOSYSMail = Nothing