
·您现在的位置: 云翼网络 >> 文章中心 >> 网站建设 >> 网站建设开发 >> ASP.NET网站开发 >> [vb.net]最简单的邮件发送
Imports Microsoft.Office.Interop.Outlook
PRivate Sub sendMail()
Dim outObj As New application
Dim item As MailItem
item = outObj.CreateItem(0)
'设定收件人地址
item.To = "[email protected]"
'设定邮件主题
item.Subject = "test"
'设定邮件内容
item.Body = "dasfdasfsda"
'设定添附文件
item.Attachments.Add("c:\tree.txt")
'发送
item.Send()
End Sub