vba - 如何将带有换行符的 mailItem.Body 复制到网站 Textarea？

Question

我objItem.Body用来填写网站文本区域。

对于 HTML 电子邮件，它会为换行符或其他内容添加空格，我该如何解决？这是一个示例电子邮件。

使用ie.document.getElementById("message").Value = objItem.Body您可以看到添加了两个额外的空格/返回。它还添加了HYPERLINK="mailto:xxxxx".

使用以下内容转换为纯文本：

objitem.BodyFormat = olFormatPlain 
objItem.Body = Replace(objItem.Body, " " & vbCrLf, vbCr) 

保留额外的间距并破坏原始电子邮件（我想保留屏幕截图等）。

我怎样才能mailItem.Body正确转移？

Answer 1

唯一剩下的就是删除超链接！IE HYPERLing "mailto:email"email 和 HYPERLINK"website" 网站

这是如何让 objitem.body 在 html 电子邮件上做正确的间距..

ie.document.getElementById("message").Value = Replace(objItem.Body, vbCrLf & vbCrLf, vbCrLf)