无须SMTP服务器中转直接发送电子邮件

无须SMTP服务器中转直接发送电子邮件前言大家一定熟悉Foxmail中的“特快专递”，它能直接将电子邮件发送到对方的邮件服务器中，而不需要经过SMTP服务器中转，这样做有什么好处？第一：发送速度比较快，不需要等SMTP服务器对邮件进行查毒、派发、验证；第二：你可以及时掌握邮件是否发送成功的信息。有时我们用Outlook发送一封邮件，到第二天对方都没收到，可我这边确实已经发送成功了，只好让对方多收几次，到了第三天SMTP服务器回信说“不好意思，你发往XXX的邮件因为XXX原因未能送达……”，原来邮件被打回来了，尤其最近163邮箱非常离谱，我发出去的10封邮件，至少有3封会被无故打回来，说什么“网络连接失败”所以被打回，莫名其妙，可能我是免费邮箱的缘故吧，没办法只好再申请多几个邮箱，我现在已经有“[e-mail]、[e-mail]、[e-mail]……”好多邮箱了，就是为了防止给别人发邮件时被无故退回……扯远了，不好意思。第三：我们有时需要在程序里将某些敏感信息发送至公司邮箱，例如：计算注册码时我们需要用户操作我们的软件将申请注册的信息发送回我们的售后服务邮箱，由我们的工作人员处理来这些邮件。大家一定会想用SMTP（SimpleMailTransferProtocol）借助SMTP服务器也能通过程序实现邮件发送，但是有一个很大问题就是安全问题，很多著名的邮件服务器运营商对于用软件方式通过SMTP协议频繁提交邮件转发的申请是不欢迎的，我的163邮箱就曾经深受其害，我那次是在写SMTP客户端发送邮件的程序，顺手就用了163的SMTP服务器，我刚发到第5封邮件时就发送失败了，我再登录163网站一查，原来我的账号被封了，原因就是我用软件发送邮件太多了（天啦，才5封而已啊），后来我花了近两个月时间跟新浪公司又赔礼又道歉，还把身份证传真过去了我的账号才被恢复。剖析邮件传送过程废话说太多请别介意，现在言归正传，要直接将邮件送到对方(POP或IMAP)服务器上，而不经过SMTP邮件服务器转交，其实也不难，你只要改用Unix/Linux操作系统，直接SendMail命令就能完成，但在Windows下想要实现这个功能恐怕得花一点心思了。我们首先要从协议RFC821-SimpleMailTransferProtocol入手来分析。首先我们看一下Email的递送过程：邮件原文→编码→SMTP客户端→SMTP转交服务器→远程SMTP服务器（对方邮局）。“特快专递”的实现思路邮件编码后被递送到一个SMTP转交服务器上，该服务器对信件分检（到同一邮局的被放在一起）后，根据优先级以及信件的先后次序被发送到远程邮局的SMTP服务器上。换句话说，只要我们知道了SMTP转交服务器是如何确定远程邮局SMTP服务器的地址的，就可以直接递送到远程邮局服务器。SMTP转交服务器又是知道远程邮局的地址呢？这就是域名解析所完成的工作了，就好比我们在IE浏览器输入“”这个域名，IE浏览器又如何知道目标服务器的IP地址呢？也是域名解析服务器的功劳。电子邮件地址由两部分组成，例如：[e-mail]，这里的chrys是邮箱名（即用户名，一个用户对应一个邮箱），163.com是邮箱服务器地址，邮箱名和邮箱服务器地址之间以“@”作为分隔。我们只要向域名服务器发送查询“163.com”的远程邮局服务器地址便可找到远程邮局SMTP服务器的IP地址，该查询指令被称作MX(MailExchange)邮件交换服务器的地址查询。远程邮局SMTP服务器的地址可能不止一个，这时，你可根据信件优先级的不同来选择对应的远程邮局，我为了安全起见会对每一个远程邮局服务器按照等级高低逐一尝试，只要将邮件成功地发送到其中一个邮局我们的任务就完成了。我们要完成几项编程工作：本机DNS的获取、与DNS服务器通信实现MX指令查询、SMTP邮件提交，下面我们一一阐述。获取本机DNS代码中我封装了一个类CnetAdapterInfo，该类可以获取本机网卡的系列信息，包括本机IP地址、子网掩码、DNS、Wins、网卡MAC地址等相关信息。首先我们需要调用IPHelpAPI库中的GetAdaptersInfo()函数来获取系统中所有网卡信息。DWORDGetAdaptersInfo(__outPIP_ADAPTER_INFOpAdapterInfo,__inoutPULONGpOutBufLen);该函数有两个参数，pAdapterInfo是一个指针，指向一个用户定义的结构体，一般是用HeapAlloc()申请的内存空间，pOutBufLen传入pAdapterInfo所指空间的大小，传出实际需要的缓冲大小，第一次调用该函数时pOutBufLen传入0，函数将返回ERROR_BUFFER_OVERFLOW表示需要更多的缓冲，并将实际需要的缓冲长度返回，我们根据实际长度用HeapAlloc()函数申请空间再次调用该函数，以下代码是枚举所有网卡并将信息保存到数组m_Ary_NetAdapterInfo中：#defineMALLOC(bytes)::HeapAlloc(::GetProcessHeap(),HEAP_ZERO_MEMORY,(bytes))#defineFREE(ptr)if(ptr)::HeapFree(::GetProcessHeap(),0,ptr)#defineREMALLOC(ptr,bytes)::HeapReAlloc(::GetProcessHeap(),HEAP_ZERO_MEMORY,ptr,bytes)////枚举网络适配器//return:------------------------------------------------------------//-1-失败//=0-网络适配器数量//intCNetAdapterInfo::EnumNetworkAdapters(){DeleteAllNetAdapterInfo();IP_ADAPTER_INFO*pAdptInfo=NULL;IP_ADAPTER_INFO*pNextAd=NULL;ULONGulLen=0;intnCnt=0;DWORDdwError=::GetAdaptersInfo(pAdptInfo,&ulLen);if(dwError!=ERROR_BUFFER_OVERFLOW)return-1;pAdptInfo=(IP_ADAPTER_INFO*)MALLOC(ulLen);dwError=::GetAdaptersInfo(pAdptInfo,&ulLen);if(dwError!=ERROR_SUCCESS)return-1;pNextAd=pAdptInfo;while(pNextAd){COneNetAdapterInfo*pOneNetAdapterInfo=newCOneNetAdapterInfo(pNextAd);if(pOneNetAdapterInfo){m_Ary_NetAdapterInfo.Add(pOneNetAdapterInfo);}nCnt++;pNextAd=pNextAd-Next;}//freeanymemoryweallocatedfromtheheapbefore//exit.wewouldn'twannaleavememoryleaksnowwouldwe?;pFREE(pAdptInfo);returnnCnt;}针对每个网卡信息，我们需要调用GetPerAdapterInfo()函数来获取指定网卡的DNS信息，使用方法和GetAdaptersInfo()类似。以下代码获取网卡基本信息：////根据传入的pAdptInfo信息来获取指定网卡的基本信息//BOOLCOneNetAdapterInfo::Init(){IP_ADDR_STRING*pNext=NULL;IP_PER_ADAPTER_INFO*pPerAdapt=NULL;ULONGulLen=0;DWORDdwErr=ERROR_SUCCESS;ASSERT(m_AdptInfo.AddressLength0);t_IPINFOiphold;//将变量清空m_bInitOk=FALSE;m_csName.Empty();m_csDesc.Empty();m_CurIPInfo.csIP.Empty();m_CurIPInfo.csSubnet.Empty();m_Ary_IP.RemoveAll();m_Ary_DNS.RemoveAll();m_Ary_Gateway.RemoveAll();#ifndef_UNICODEm_csName=m_AdptInfo.AdapterName;m_csDesc=m_AdptInfo.Description;#elseUSES_CONVERSION;m_csName=A2W(m_AdptInfo.AdapterName);m_csDesc=A2W(m_AdptInfo.Description);#endif//获取当前正在使用的IP地址if(m_AdptInfo.CurrentIpAddress){m_CurIPInfo.csIP=m_AdptInfo.CurrentIpAddress-IpAddress.String;m_CurIPInfo.csSubnet=m_AdptInfo.CurrentIpAddress-IpMask.String;}else{m_CurIPInfo.csIP=_T(0.0.0.0);m_CurIPInfo.csSubnet=_T(0.0.0.0);}//获取本网卡中所有的IP地址pNext=&(m_AdptInfo.IpAddressList);while(pNext){iphold.csIP=pNext-IpAddress.String;iphold.csSubnet=pNext-IpMask.String;m_Ary_IP.Add(iphold);pNext=pNext-Next;}//获取本网卡中所有的网关信息pNext=&(m_AdptInfo.GatewayList);while(pNext){m_Ary_Gateway.Add(pNext-IpAddress.String);pNext=pNext-Next;}//获取本网卡中所有的DNSdwErr=::GetPerAdapterInfo(m_AdptInfo.Index,pPerAdapt,&ulLen);if(dwErr==ERROR_BUFFER_OVERFLOW){pPerAdapt=(IP_PER_ADAPTER_INFO*)MALLOC(ulLen);dwErr=::GetPerAdapterInfo(m_AdptInfo.Index,pPerAdapt,&ulLen);//ifwesucceedthanweneedtodropintoourloop//andfillthednsarraywillallavailableIP//addresses.if(dwErr==ERROR_SUCCESS){pNext=&(pPerAdapt-DnsServerList);while(pNext){m_Ary_DNS.Add(pNext-IpAddress.String);pNext=pNext-Next;}m_bInitOk=TRUE;}//thisisdoneoutsidethedwErr==ERROR_SUCCESjustincase.themacro//usesNULLpointercheckingsoitisokifpPerAdaptwasneverallocated.FREE(pPerAdapt);}returnm_bInitOk;}至此我们已经获取到系统中所有DNS服务器地址了。MX指令查询获取远程邮局地址与DNS服务器通信其实就是一个简