案例VB.NET网络之实现E-mail的发送

开发 后端
这里利用VB.NET网络编程实现E-mail的发送部分,步骤分为两步:参数设置、VB.NET网络程序设计,有代码和解释,看了就会发现其实VB.NET网络编程也不是那么难学的。

我们常常发E-mail邮件,可是你知道我们怎么把我们写的邮件发送给另一方的吗?利用VB.NET网络可以实现这个过程,下面我们就来设计E-mail的发送部分:

1.参数设置

进入Exchange系统,选择新增设置文件后屏幕上会显示所需要的信息服务,选择Internet Mail。把设置文件的名称设为test。屏幕会显示两个选项,您可以选择以Modem方式或以Network 方式连接。笔者所用的是Modem方式;假若您是使Internet专线,就要选择Network 方式。

选择Modem方式后,Exchange会要求我们输入邮件服务器的IP地址。接着将Transform Message的模式设置为Automatic,这样当我们连接到邮件服务器时,新的信息会自动下载到本地端。接下来,将您所使用的E mail地址、全名、口令和下载路径等一一设置好。

2.VB.NET网络程序设计

在Form上加入一个MAPIMessage控件,取名为MAPIMessage1;加入一个MAPISession控件,取名为MAPISession1;并加入三个TextBox控件,取名为Subject、Content和Addr。并在三个TextBox前各加入一个Label,将Caption分别改为标题、内容和地址。

将MAPIMessage1的各项属性设置如下:

  1. ·DownLoadMail=TRUE;  
  2. ·LogonUI=TRUE;  
  3. ·NewSession=FALSE;  
  4. ·UserName=“发送E mail”。  

这里将DownLoadMail设置为TRUE,当程序和邮件服务器***次连接时,会将新的邮件下载到本地端。将LogonUI设置为TRUE,则当您程序中Logon名称输入错误时,系统会显示一个Message Box来让您输入正确的名称。

由于这个程序仅使用一个Session,所以可将NewSession设置成FALSE。如果您有许多Session要建立的话,则将它设置成TRUE。UserName中所填的,是我们在Exchange中所新增的设置文件名称,如果没有填内容的话,系统将会显示一些Message Box请您输入文件。在Form上加入三个按钮,Logon、Logoff和Send,并分别将它们的Caption改为登录、离网和发送。

在 Logon_Click()事件中加入以下程序代码,程序的功能是使我们登录到邮件服务器:

  1. MAPISession1.SignOn   
  2. MAPIMessage1.SessionID=MAPISession1.SessionID   
  3. sgBox “Your ID is” + Str   
  4. (MAPISession1.SessionID) 

其中MAPISession1.SignOn是作登录的动作。在登录时,因为已经将MAPIMessage1控件的DownLoadMail属性设置为TRUE,所以可以在屏幕上看到Message Box,显示系统正在下载邮件。登录成功后,系统会传回一个SessionID,将该ID填入MAPIMessage1的SessionID中,这样就可以利用该Session来传送E mail,同时用Message Box通知用户发送成功。

在Logoff_Click()事件中加入以下程序代码,程序的功能是使我们离开邮件服务器:

  1. MAPIS1.SignOff 

在Send_Click()事件中加入以下程序代码,程序的功能是使我们发送E mail:

  1. MAPIMessage1.Compose   
  2. MAPIMessage1.RecipDisplayName = Addr.text   
  3. MAPIMessage1.AddressResolveUI = TRUE   
  4. MAPIMessage1.MsgSubject = Subject.text   
  5. MAPIMessage1.MsgNoteText = Content.text   
  6. MAPIMessage1.Send   
  7. MsgBox “您发送成功啦!” 

其中Compose命令的主要目的是使您可以改变RecipDisplayName的内容,将所需传送的E mail地址、主题和文章内容分别填入RecipDisplayName、MsgSubject和MsgNoteText,接着用Send命令发送出去,VB.NET网络编程还是很好用的吧。

【编辑推荐】

  1. VB.NET重命名批量修改大揭秘
  2. 程序员必看VB.NET CASE语句拓展篇
  3. 深入介绍VB.NET类库 SmartRWLocker技巧
  4. VB.NET复制读取音频文件到剪贴板小技巧
  5. 深入概括VB.NET运行环境
责任编辑:田树 来源: 博客
相关推荐

2010-06-02 15:15:05

Sendmail 配置

2009-10-29 14:02:24

VB和VB.NET比较

2009-11-03 10:18:46

VB.NET继承

2009-11-02 16:55:50

VB.NET Smar

2009-10-26 17:38:22

VB.NET实现缩略图

2009-11-03 13:16:58

VB.NET读取文件

2010-06-02 14:19:50

Sendmail 配置

2009-11-10 14:30:33

VB.NET多窗体

2009-10-26 17:10:53

VB.NET word

2009-11-02 10:53:34

VB.NET INI文

2011-03-29 15:59:01

CactiThresholde-mail

2010-01-22 18:14:49

VB.NET菜单组件

2009-10-23 13:22:25

VB.NET实现拖动图

2009-10-12 14:32:40

VB.NET实现定时关

2010-01-08 15:41:36

VB.NET窗口关闭

2010-01-12 10:48:54

VB.NET LIST

2009-10-13 10:21:58

VB.NET实现Web

2009-10-28 15:30:59

VB.NET网络技巧

2009-02-19 21:06:33

计算机英语E-mail地址符号研究

2009-10-29 16:46:32

VB.NET语言
点赞
收藏

51CTO技术栈公众号