dim bodyhtmltext as string
我要接收邮件,并在WebBrowser 中显示出来:
代码如下:
Using pop3 As New LumiSoft.Net.POP3.Client.POP3_Client()
pop3.Connect(pop3Server, pop3Port, pop3UseSsl)
pop3.Login(username, password)
Dim msgs As Object = pop3.messages()
'获取某邮件信息
Dim messageBytes = msgs(0).MessageToByte
Dim mime_message = LumiSoft.Net.Mail.Mail_Message.ParseFromByte(messageBytes)
bodyhtmltext = mime_message.BodyHtmlText.ToString
End Using
Dim wb As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim fl As String = "c:\temp.htm"
FileSys.WriteAllText(fl, bodyhtmltext , False)
wb.Address = fl
至此,邮件内容已经可以显示。
只是,bodyhtmltext中包括以下文字,应该是一个图片,没有正确显示。
求老师给点指导?怎么才能看到这个图片?
<img src="cid:_Foxmail.1@12e3439a-361e-8500-36ae-38787769720b" style="background-color: transparent;">
这种格式的图片地址网页是无法识别的。应该是需要把图片下载到网页文件所在目录里,然后把图片地址改为本地路径