我已经在互联网上搜索了几个小时以找到我的问题的解决方案。
我很早就知道如何导入邮件，但无法像手动将 OL 中的正文复制到访问表单上的富文本备忘录字段中那样保持 HTML 正文的格式。
字段 (olbody) 绑定到 SQL server 表字段 olbody (nvarchar(max)) 并且可以在我插入剪贴板内容时存储 html 邮件正文。
我什至尝试读取剪贴板中的 .HTMLbody 属性
clp.SetText .HTMLBody
clp.PutInClipboard
然后我在字段中使用 Ctrl+V 手动粘贴了剪贴板的内容，但同样，它并没有像 HTML 邮件那样显示出来。但我可以看到所有 HTML 命令，它们应该格式化邮件。
如果没有在访问字段中格式化邮件，则内容几乎无法阅读，因为正文中没有标签、换行符等。
欢迎任何帮助。 谢谢
【问题讨论】：
标签： html sql-server ms-access
显示 HTML 的正确方法是使用网络浏览器。这意味着：使用网络浏览器控件！
您可以在加载时以及邮件字段更改时在 webbrowser 控件中加载 HTML。
示例代码：
Private Sub Form_Current()
Dim wb As Object
Set wb = MyWebbrowserControl.Object
With wb
.Navigate2 "about:blank"
Do Until .ReadyState = 4 '=READYSTATE_COMPLETE
'This is a somewhat inefficient way to wait, but loading a blank page should only take a couple of milliseconds
DoEvents
Loop
.Document.Open
.Document.Write MemoField.Value
.Document.Close
End With
End Sub
将 Memofield 替换为您的邮件字段，并将 MyWebbroserControl 替换为您的 webbrowser 控件，您应该准备好了。
请注意，您可能应该使用 Access 网络浏览器，而不是 ActiveX 网络浏览器。此代码适用于两者，但 Access Web 浏览器控件使用更现代的 IE 版本，并且不带有不可移动的边框。
【讨论】：