CDO email Oauth2

[upnorth]

Have used this to send emails from a MS Access database for a number of years.


The send using has just been changed to OAuth2
​Can CDO deal with that ?
David

TIA





Set cdomsg = CreateObject("CDO.message")
With cdomsg.Configuration.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'NTLM method
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp-mail.outlook.com"
.Item("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 587
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "****@outlook.com"
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "****"
.Update
End With

[Welshgasman]

No idea TBH, but a quick Google gives me, among many other links https://learn.microsoft.com/en-us/ex...ecommendations

[Welshgasman]

Crossposted https://www.access-programmers.co.uk...-email.274826/

[Micron]

Sometimes it only takes the first post ever by a forum user to end up on someone's ignore list.