1.在vb.net工程中添加引用
2.程序如下:
Imports Microsoft.Office.Interop.Outlook
Private Sub sendMail()
Dim outObj As New Application
Dim item As MailItem
item = outObj.CreateItem(0)
'设定收件人地址
item.To = "abc@163.com"
'设定邮件主题
item.Subject = "test"
'设定邮件内容
item.Body = "dasfdasfsda"
'设定添附文件
item.Attachments.Add("c:\tree.txt")
'发送
item.Send()
End Sub