两种VB.NET发送邮件方法解读

开发 后端
我们在这里将会通过两个例子来详细阐述VB.NET发送邮件的具体实现方法。这两种例子分别是使用outLook提供的发送以及在asp.net中引用System.Web.Mail类来实现。

VB.NET功能非常强大,程序界面标准,可以帮助程序员提高开发效率。它能够支持类的各种特性。那么今天我们将会通过对VB.NET发送邮件的方法的理解,对这一语言的使用技巧进行一个详细的解读。

VB.NET发送邮件实现方法之一、使用outLook提供的发送

如:我见过的用友软件U8生产制造(演示版),其中的邮件功能就是通过调用outLook的ActiveX 组件

优点:开发简单

缺点:依赖outlook组件,SMTP 邮件服务

邮件发送的代码如下:

以下是引用片段:

  1. Private Sub Send()   
  2. Dim outObj As New 
    Outlook.Application()   
  3. Dim Item As Outlook.
    MailItemClass   
  4. Item = outObj.CreateItem(0)   
  5. Item.To = "lihonggen0@163.com "   
  6. Item.Subject = "hello"   
  7. Item.Body = "hell"   
  8. Item.Attachments.Add
    ("C:\abc.txt")   
  9. Item.Send()   
  10. End Sub  

VB.NET发送邮件实现方法之二、WEB开发,在asp.net中引用System.Web.Mail类#t#

System.Web.Mail 命名空间包含使您可以使用 CDOSYS(Windows 2000 的协作数据对象)消息组件来构造和发送消息的类。邮件消息是通过内置在 Microsoft Windows 2000 中的 SMTP 邮件服务或任意的 SMTP 服务器来传送的。此命名空间中的类可以在 asp.Net 或任何托管应用程序

MailAttachment提供用于构造电子邮件附件的属性和方法。

MailMessage提供用于构造电子邮件的属性和方法。

SmtpMail提供用于使用 Windows 2000 的协作数据对象 (CDOSYS) 消息组件来发送消息的属性和方法。

邮件可以通过 Microsoft Windows 2000 中内置的 SMTP 邮件服务或任意 SMTP 服务器来传送。System.Web.Mail 命名空间中的类型可以在 ASP.Net 或任何托管应用程序使用。

Smtp服务器的设置,现在一些免费邮件提供商是不再提供针对所有邮件提供Smtp服务,在发送邮件的时候,需要验证用户信息,考虑Smtp用户验证问题

如果Smtp服务器在本地计算机,发送速度很快的,基本上不用担心,如果不是本地服务器,那么发送的时候***不要以此太多,一是速度问题,二是以此发送太多邮件,Smtp服务器可能认为是垃圾邮件而拒绝服务

VB.NET发送邮件的代码如下:

以下是引用片段:

  1. Private Sub Button1_Click(ByVal 
    sender As System.Object, ByVal e 
    As System.EventArgs) Handles 
    Button1.Click   
  2. Dim mailObj As New MailMessage()   
  3. Dim smtp As SmtpMail   
  4. '定义SMTP服务器的名称   
  5. smtp.SmtpServer = "smtp.XXX.com"   
  6. '定义邮件的发送地址   
  7. mailObj.From = "lihonggen@XXX.com"   
  8. '定义邮件的接收地址   
  9. mailObj.To = " AAA@XXX.com"   
  10. '定义邮件的暗送地址   
  11. mailObj.Bcc"aa@sina.com"   
  12. '定义邮件的抄送地址   
  13. mailObj.Cc = "aaa@sina.com"   
  14. '定义邮件的主题   
  15. mailObj.Subject = "主题"   
  16. '定义邮件的主体   
  17. mailObj.Body = "邮件主体!"   
  18. '邮件以 HTML的格式发送   
  19. mailObj.BodyFormat = MailFormat.Html   
  20. '定义邮件的有限级,在此设定为高   
  21. mailObj.Priority = MailPriority.High   
  22. '给发送的邮件附加上一个附件   
  23. mailObj.Attachments.Add(New 
    MailAttachment("c:\aa.doc"))   
  24. smTp.Send(mailObj)   
  25. End Sub 

总结:选择何种VB.NET发送邮件的方案,视程序的用途和需求而定,本文例出的几种方案,供大家参考。例如用友软件U8,调用outlook组件,一样整合到自己的软件中。我编写的管理系统,自己写组件(SMTP),功能同样强大,不过Coding的时间就长了!

责任编辑:曹凯 来源: wewill.cn
相关推荐

2010-01-20 14:00:03

VB.NET串联运算符

2009-10-26 10:30:57

VB.NET处理FTP

2009-11-03 16:20:16

VB.NET文本框

2010-01-20 13:53:29

VB.NET分析电子邮

2010-01-13 09:31:39

VB.NET窗体打印

2010-01-18 16:58:29

VB.NET Over

2010-01-14 09:55:06

VB.NET IEnu

2009-11-03 09:26:13

VB.NET方法

2010-01-08 14:50:47

VB.NET测试硬盘速

2010-01-18 14:47:42

VB.NET获取环境变

2010-01-19 17:03:25

VB.NET可执行语句

2010-01-08 10:48:05

VB.NET多线程

2010-01-08 10:37:50

VB.NET数据库

2010-01-20 10:56:14

VB.NET Main

2009-11-03 10:51:33

VB.NET共享

2010-01-21 10:48:18

VB.NET扩展方法

2009-10-27 11:32:42

VB.NET Disp

2010-01-07 15:25:11

VB.NET数组

2009-10-14 16:46:25

VB.NET OnSt

2009-11-03 10:00:20

VB.NET New方
点赞
收藏

51CTO技术栈公众号