发送电子邮件使用经典ASP与嵌入式图像
我使用wysiwyg编辑器制作NewsLetter ..它允许我上传图像路径 和图像路径存储在上传目录中.. 不当我检索该图像使用它在网站.. 编辑器的值存储在数据库 例如 <br>
喜发送电子邮件使用经典ASP与嵌入式图像
<img src="upload/acb.gif">
<br>
你好
我发送电子邮件和这封电子邮件的细节是从数据库收到和这个细节被发向顾客
他gettion所有的文本价值,但无法看到图像
所以建议我做什么..?
你在使用发送电子邮件,我一直在使用AspEmail在过去的成功:http://www.aspemail.com/
它说明了如何在这里发送嵌入图像:http://www.aspemail.com/manual_04.html
但是你必须把它安装在你的服务器上,如果你使用共享主机,这可能是一个问题,如果你正在运行你自己的服务器很容易!
你将不得不网站的网址添加到IMG源
< IMG SRC =“http://www.sitename.com/upload/acb.gif” >因为用户没有访问您的网站他的邮箱。
为此,您可以将“http://www.sitename.com/”设置为web.config中的一个键并在您的邮件中使用。
这将确定地解决您的问题。快乐编码!!!!!!!!!!!!!
如果您使用CDOSYS.Message发送电子邮件,则可以使用Message.CreateMHTMLBody(url)方法轻松发送包含嵌入图像的完整网页。
Dim Message
Set Message = CreateObject("CDOSYS.Message")
Message.From = "[email protected]"
Message.To = "[email protected]"
Message.CreateMTHMLBody "http://yourserver.org/email.html"
Message.Send()
我最近清理了一些代码,我已经躺着做这件事,并在github上作为“Gist”在线拍打它;希望它仍然有助于某人!
Sending embedded images with CDOSYS
此解决方案使用CDO(CDOSYS/CDO.Message),用“AddAttachment”,并手动控制附件的属性,以使它们可用从电子邮件HTML内,并且为单独避免它们出现电子邮件客户端中的可下载附件。
的用量是很简单,只通过一个本地路径引用的图像在消息的HTML中,例如(代码上运行的计算机上):
Some Image: <img src="<EMBEDDEDIMAGE:C:\test.jpeg>" />
该代码将拿起文件名,将该文件作为附件添加到消息中,并将消息HTML的相关部分替换为对该附件的内部引用。
你会使用AddRelatedBodyPart:
嵌入用途 创建阵列和“的SendMail”功能把它作为在电子邮件正文例如参数 使用
Dim arrRelatedBodyPart(1)
arrRelatedBodyPart(0) = Server.MapPath(".") & "/images/barcode/bar_blk.gif"
arrRelatedBodyPart(1) = Server.MapPath(".") & "/images/barcode/bar_wht.gif"
例
For i = 0 To UBound(arrRelatedBodyPart)
Dim strPathAndFileName: strPathAndFileName = arrRelatedBodyPart(i)
Dim strFileName: strFileName = GetFileName(arrRelatedBodyPart(i), "/")
'.AddRelatedBodyPart strPathAndFileName, strFileName, cdoRefTypeId
Set objCDOBodyPart = .AddRelatedBodyPart(strPathAndFileName, strFileName, 1)
objCDOBodyPart.Fields.Item("urn:schemas:mailheader:Content-ID") = "<" & strFileName & ">"
objCDOBodyPart.Fields.Update
Next