Imports Microsoft.Office.Interop.Outlook Private Sub sendMail() Dim outObj As New Application Dim item As MailItem item = outObj. ...
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
海外公司注册、海外银行开户、跨境平台代入驻、VAT、EPR等知识和在线办理:https://www.xlkjsw.com
原标题:[vb.net]最简单的邮件发送
关键词:.NET
*特别声明:以上内容来自于网络收集,著作权属原作者所有,如有侵权,请联系我们:
admin#shaoqun.com
(#换成@)。