如何用VB生成一封邮件并发送出去。
邮件要求:
1、可指定收件人地址
2、邮件的格式为html格式
3、可自由定制邮件的内容
4、邮件可以带附件我用下面的语句试过:
ShellExecute 0& vbNullString "mailto:[email protected]?subOjbect=xxxx&bodyformat=html&body=sjfsdjkfj",vbNullString,vbNullString这条语句可以生邮件,但就是无法生成html格式的邮件,而只是生成Text格式的,我已用了bodyformat=html的呀,为什么呢?怎么办?
邮件要求:
1、可指定收件人地址
2、邮件的格式为html格式
3、可自由定制邮件的内容
4、邮件可以带附件我用下面的语句试过:
ShellExecute 0& vbNullString "mailto:[email protected]?subOjbect=xxxx&bodyformat=html&body=sjfsdjkfj",vbNullString,vbNullString这条语句可以生邮件,但就是无法生成html格式的邮件,而只是生成Text格式的,我已用了bodyformat=html的呀,为什么呢?怎么办?
ShellExecute 0& vbNullString "mailto:[email protected]?subOjbect=xxxx&bodyformat=html&body=sjfsdjkfj",vbNullString,vbNullString为什么不行呢?
ShellExecute 0& vbNullString "mailto:[email protected]?subOjbect=xxxx&bodyformat=html&body=sjfsdjkfj",vbNullString,vbNullString为什么不行呢?
请帮忙!!!!!!!!!!
MAPISession1.SignOnIf MAPISession1.SessionID <> 0 Then
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.Compose
MAPIMessages1.RecipDisplayName = txtname.Text
MAPIMessages1.RecipAddress = txtaddress.Text
MAPIMessages1.AddressResolveUI = True
MAPIMessages1.ResolveName
MAPIMessages1.MsgSubject = txtsubject.Text
MAPIMessages1.MsgNoteText = txtnote.Text
MAPIMessages1.Send False
End IfEnd Subhttp://community.csdn.net/Expert/topic/4306/4306432.xml?temp=.0572626我也正做着呢! 你别把pop3配置错了
ShellExecute 0& vbNullString "mailto:[email protected]?subOjbect=xxxx&bodyformat=html&body=sjfsdjkfj",vbNullString,vbNullString
为什么不行,错在哪里?
ShellExecute 0& vbNullString "mailto:[email protected]?subOjbect=xxxx&bodyformat=html&body=sjfsdjkfj",vbNullString,vbNullString
不行作出正确的解释吗?