vb.net连接Outlook发送邮件(亲自实践)

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!