你的位置:首页 > ASP.net教程

[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 = "abc@163.com"     '设定邮件主题    item.Subject = "test"     '设定邮件内容    item.Body = "dasfdasfsda"     '设定添附文件    item.Attachments.Add("c:\tree.txt")     '发送    item.Send()   End Sub