About 12 years ago I wrote a membership program for a local charity in VFP. It has continued to work with the odd tweak ever since. It uses Microsoft CDO to send emails – I know CDO is obsolete, so is VFP but it works! 😊. The code is below, cribbed from SweetPotatoSoftware many years ago:
lcSchema = http://schemas.microsoft.com/cdo/configuration/
loConfig = CREATEOBJECT("CDO.Configuration")
WITH loConfig.FIELDS
.ITEM(lcSchema + "smtpserver") = "smtp.ionos.co.uk"
.ITEM(lcSchema + "smtpserverport") = 587
.ITEM(lcSchema + "sendusing") = 2
.ITEM(lcSchema + "smtpauthenticate") = .T.
.ITEM(lcSchema + "smtpusessl") = .F.
.ITEM(lcSchema + "sendusername") = lcUserName
.ITEM(lcSchema + "sendpassword") = lcPassword
.UPDATE
ENDWITH
I have been advised by our email provider that we must upgrade to TLS 1.2. I had hoped that it would be as simple as changing usessl to True but that doesn’t appear to be the case. I am out of my depth having been away from serious programming for many years. Any help or suggestions would be gratefully received!
John Weller
07976 393631
--- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html ---