从 Windows 桌面应用程序发送电子邮件的未来答案

【问题标题】：Future of email sending from Windows desktop application从 Windows 桌面应用程序发送电子邮件的未来
【发布时间】：2021-12-17 18:46:53
【问题描述】：

谢尔盖 CDO 课程

https://www.berezniker.com/content/pages/visual-foxpro/cdo-2000-class-sending-emails

用于发送电子邮件。

不再支持 CDO：

https://support.microsoft.com/en-us/topic/collaboration-data-objects-cdo-1-2-1-is-not-supported-with-outlook-2010-and-later-versions-268ce809-7923-95ba-2c70-3f23569f57eb

如何使用支持的方法从 Visual FoxPro 9 桌面应用程序发送电子邮件？

【问题讨论】：

我正在使用基于 Golang 的发件人。它非常简单，但是是定制的，我向它发送一个包含加密信息的 json 结构，然后它会完成其余的工作。您不妨使用带有 C# 的 activex 构建。很简单。样品检查这个foxite.com/archives/…
这需要创建 c# wrapper ActiveX 和它的注册。使用 Sergey CDO2000 类只允许使用 FoxPro 代码。 blat.dll 也可以，但它不支持 SSL 连接。在 VFP 中哪里可以找到不需要其他语言编程的解决方案？
我从未见过一种 VFP 解决方案。我所看到和使用的都是基于其他语言的（无论是基于 C++ 的 FLL，基于 C# 的 activex ...）。创建和注册基于 C# 的 activex 很简单（查看我提供的链接）。用 Golang 编写一个也很简单，看起来就像使用内置 SSL 等的 blat。我使用了一个来自知名网络工具提供商的 VFP 工具，但它在调试时给我们带来了问题，所以我决定自己编写。
BTW CDO 不仅使用 VFP 代码。它也是一个activex。
有 Sergey VFP 类直接调用 CDO。无需维护其他语言代码。用户无权注册 ActiveX 控件。如何在没有 ActiveX 注册权限的情况下发送电子邮件？

标签： email visual-foxpro foxpro email-client cdo.message

【解决方案1】：

如果您使用 CDO，那么您是通过 Outlook 发送的，那么为什么不直接自动化 Outlook 呢？

loOutlook = CreateObject("Outlook.Application")
loMessage = loOutlook.CreateItem(0)

loMessage.Subject = "test email 1"
loMessage.Recipients.Add("recipient@company.com")
loMessage.BodyFormat = 2        && 2 = html 3 = rtf
lcHtmlBody = "<html><body>This is the body text.</body></html>"
loMessage.HTMLBody = lcHtmlbody
loMessage.Send()

【讨论】：

CDO 不使用 Outlook。 Outlook 未安装在客户端计算机中。