快速业务通道

用BCB开发有身份认证功能的Email程序

作者 佚名技术 来源 程序设计 浏览 发布时间 2012-06-29

摘 要 本文介绍了如何增强BCB中发送电子邮件的NMSMTP控件的功能,实现具有身份认证功能的邮件发送程序。

关键词 ESMTP,MIME,身份认证

引言

为了更有效地抑制垃圾邮件的泛滥,目前多数网站的邮件收发系统都使用了ESMTP服务的身份认证功能。即用户发送邮件时,需要对用户的身份进行验证,如果帐号或密码错误,邮件服务器会拒绝发送邮件。Borland C++ Builder 6中有丰富的控件供开发者使用,其中当然也包括邮件发送控件NMSMTP,这个控件使用方便,但是惟一的缺点是不支持邮件发送时的身份认证功能。笔者通过对邮件发送协议的分析,在使用控件的基础上设计了具有身份认证功能的邮件发送程序。

ESMTP协议分析

为了实现身份认证功能,目前ESMTP协议中增加了一部分内容,这就是身份认证。下面我们看看这段认证过程,以笔者在网易的邮箱为例(其中C表示客户端,S表示邮件服务器):

(1)C: AUTH LOGIN

(2)S: 334 dXNlcm5hbWU6

(3)C: d3lxX2puX3NkX2Nu

(4)S: 334 UGFzc3dvcmQ6

(5)C: 密码略去

(6)S: 235 Authentication successful

详细说明:

(1)客户端向服务器发送认证指令。

(2)服务器返回Base64编码串,334意味成功。编码字符串解码后为"username:",说明要求客户端发送用户名。

(3)客户端发送Base64编码的用户名串,此处为"wyq_jn_sd_cn"。

(4)服务器返回Base64编码串,334意味成功。编码字符串解码后为"password:",说明要求客户端发送用户口令。

(5)客户端发送Base64编码的口令串,此处略去。

(6)服务器返回普通字符串,235意味成功,表示认证成功可以发送邮件了。

MIME Base64编码解释

一般的计算机编码的一个字节是8bit,0——FF就是256种不同的8bit组合。我们现在要介绍的这种Base64编码则是每个字节6bit,共有26=64种组合。其中每种组合对应一个字符,这些字符是“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz01234567 89+/。”这就意味着每3个普通编码可以转换成4个Base64编码,那么如果需要转换的普通编码不是3的整数倍怎么办?Base64规定,位数不足的字节后面补0,然后差几个字符补几个‘=’号。

设计思路

我们可以使用NMSMTP控件与邮件服务器连接。通过调用Connect方法,然后监听OnConnect事件;在OnConnect事件里我们可以增加身份认证功能。这里是主要利用了NMSMTP从Powersock中继承的一些基本网络通讯函数,包括Read,DataAvailable,SendBuffer等来实现身份认证过程。如果身份认证成功,就可以继续进行邮件发送;否则,提示错误信息,断开网络连接。

程序实现

使用BCB设计如图1所示的窗体。

用BCB开发有身份认证功能的Email程序

图1 程序主界面

1、在登录按钮的OnClick事件中调用连接函数

void __fastcall TForm1::Logon1Click(TObject *Sender)
{
   AddLog("正在登录"+Edit1->Text+"......");
   NMSMTP1->Host = Edit1->Text; //主机地址
   NMSMTP1->Port = 25; //主机端口,缺省为25
   NMSMTP1->UserID = Edit4->Text; //用户名
   NMSMTP1->Connect(); //连接主机
}

2、处理OnConnect事件

void __fastcall TForm1::NMSMTP1Connect(TObject *Sender)
{
 AddLog("连接服务器成功。");
 AnsiString Data="",rData="";
 bool b_ok;
 if(CheckBox1->Checked){
  Data="AUTH LOGIN\r\n"; //登录请求命令
  NMSMTP1->SendBuffer(Data.c_str(),Data.Length()); //命令发出
  rData = WaitForReply(5); //等待接收返回数据,5秒内必须返回
  b_ok = false;
  if(rData.Length()>=3){
   //334意味着服务器要求输入用户名
   if(rData.TrimLeft().SubSt

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号