Question

我在ACCESS（Office 10，Windows 7）中编写了一个可用的电子邮件系统。但我希望能够发送带有图形和文本的格式化文档或PDF等，就像电子邮件本身一样。我已经阅读了SendObject，但我认为将文档作为附件发送，我希望它是电子邮件本身。我收到这样的电子邮件，只是想知道它是如何完成的。

感谢您的时间

Answer 1

要使用图形，图像自定义字体和字体颜色格式化电子邮件正文，您可以将您的电子邮件正文设为HTML，例如：

Dim strBodyMsg AS String

strBodyMsg = "<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en-US">"
strBodyMsg = strBodyMsg & "<head><title>...</title> </head>"
strBodyMsg = strBodyMsg & "<Body> "
strBodyMsg = strBodyMsg & "your email body message goes here"
strBodyMsg = strBodyMsg & "</Body>"

还要注意在VBA中打开电子邮件对象时..这是方法

EmailObject.BodyFormat = olFormatHTML

电子邮件中的MS ACCESS VBA发送对象

1 个答案: