ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   email (CDO) with SSL (https://www.excelbanter.com/excel-programming/347671-email-cdo-ssl.html)

as_sass[_8_]

email (CDO) with SSL
 

Thanks to a bunch of you and Ron's website, I figured out how to sen
email in Excel using CDO. I've automated a lot of stuff like this, bu
now I have a problem:

I'm sending the email through an university email account. M
university sent me an email saying that starting soon, they will onl
support logging into email accounts using an SSL connection. M
question is, will emailing in Excel using CDO work with SS
connections, and what is the command I will have to add to my code?

As my code is kind of complex and contains some stuff not relevant t
the issue, I have pasted the original code that I based it on below
It's from Ron's web site (www.rondebruin.nl).

Any thoughts are appreciated!

as

---------------------

Sub Mail_Small_Text_CDO()
Dim iMsg As Object
Dim iConf As Object
Dim strbody As String
' Dim Flds As Variant

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")

' iConf.Load -1 ' CDO Source Defaults
' Set Flds = iConf.Fields
' With Flds
'
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")
"Fill in your SMTP server here"
'
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport"
= 25
' .Update
' End With

strbody = "Hi there" & vbNewLine & vbNewLine & _
"This is line 1" & vbNewLine & _
"This is line 2" & vbNewLine & _
"This is line 3" & vbNewLine & _
"This is line 4"

With iMsg
Set .Configuration = iConf
.To = "
.CC = ""
.BCC = ""
.From = """Ron"" "
.Subject = "Important message"
.TextBody = strbody
.Send
End With

Set iMsg = Nothing
Set iConf = Nothing
End Su

--
as_sas
-----------------------------------------------------------------------
as_sass's Profile: http://www.excelforum.com/member.php...nfo&userid=906
View this thread: http://www.excelforum.com/showthread.php?threadid=49199


Ron de Bruin

email (CDO) with SSL
 
Hi as_sass

I don't know this but will try to find a answer for you


--
Regards Ron de Bruin
http://www.rondebruin.nl


"as_sass" wrote in message
...

Thanks to a bunch of you and Ron's website, I figured out how to send
email in Excel using CDO. I've automated a lot of stuff like this, but
now I have a problem:

I'm sending the email through an university email account. My
university sent me an email saying that starting soon, they will only
support logging into email accounts using an SSL connection. My
question is, will emailing in Excel using CDO work with SSL
connections, and what is the command I will have to add to my code?

As my code is kind of complex and contains some stuff not relevant to
the issue, I have pasted the original code that I based it on below.
It's from Ron's web site (www.rondebruin.nl).

Any thoughts are appreciated!

as

---------------------

Sub Mail_Small_Text_CDO()
Dim iMsg As Object
Dim iConf As Object
Dim strbody As String
' Dim Flds As Variant

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")

' iConf.Load -1 ' CDO Source Defaults
' Set Flds = iConf.Fields
' With Flds
'
Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'
Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
"Fill in your SMTP server here"
'
Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")
= 25
' .Update
' End With

strbody = "Hi there" & vbNewLine & vbNewLine & _
"This is line 1" & vbNewLine & _
"This is line 2" & vbNewLine & _
"This is line 3" & vbNewLine & _
"This is line 4"

With iMsg
Set .Configuration = iConf
To = "
CC = ""
BCC = ""
From = """Ron"" "
Subject = "Important message"
TextBody = strbody
Send
End With

Set iMsg = Nothing
Set iConf = Nothing
End Sub


--
as_sass
------------------------------------------------------------------------
as_sass's Profile: http://www.excelforum.com/member.php...fo&userid=9065
View this thread: http://www.excelforum.com/showthread...hreadid=491994




as_sass[_9_]

email (CDO) with SSL
 

Ron,

That would be awesome!

Thanks for the effort,

a

--
as_sas
-----------------------------------------------------------------------
as_sass's Profile: http://www.excelforum.com/member.php...nfo&userid=906
View this thread: http://www.excelforum.com/showthread.php?threadid=49199


Ron de Bruin

email (CDO) with SSL
 
Only bad information for you on this moment.
If I know more I post here


--
Regards Ron de Bruin
http://www.rondebruin.nl


"as_sass" wrote in message
...

Ron,

That would be awesome!

Thanks for the effort,

as


--
as_sass
------------------------------------------------------------------------
as_sass's Profile: http://www.excelforum.com/member.php...fo&userid=9065
View this thread: http://www.excelforum.com/showthread...hreadid=491994





All times are GMT +1. The time now is 05:24 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com