如何不用MAPI或其他第三方控件，而用WinSock来编写邮件发送程序，smtp服务器需要进行身份认证。

各位，给个思路或源代码的链接。

解决方案 »

  1.   

    可以发，但是发送量太小了，以前借用外部一个封装的winsock照着国外的书抄过一个，8过丢了-_-#现在不会写了..
      

  2.   

    习惯了在别人开发的邮件客户端程序来收发邮件后，自己也总想“打破常规”，弄点什么新颖的玩意儿来换换“口味”。于是一不做，二不休，自己开始琢磨着如何使用VB来设计一个简单的邮件客户端程序。下面就是笔者的一些设计思路，仅供大家参考。 　　设计该程序的基本步骤为：首先使用微软公司提供的MAPI接口在邮件程序中建立一条或数条Session；当Session建立好之后，Client端程序就可以使用MAPI所提供的功能。然后Visual Basic所提供的MAPI control，来设计mail传送和接收的程序。在设置邮件的发送部分时，我们应该先进入Exchange设置界面，并选择“新增”命令来添加一个设置文件；随后根据屏幕上的提示，选择“Internet Mail”设置项，并给设置文件取名为“888”；接着我们再依次设置好接入因特网的方式，输入邮件服务器的地址、设定传输模式等参数，笔者在这里给出的参数是接入方式为network，邮件服务器的地址为168.160.128.10，传输模式设置为automatic。 
    　　设定好邮件的相关参数后，接下来的工作就是使用VB来正式开始设计程序了。打开VB程序的操作界面，用鼠标选种File菜单项中的New Project来新建一个项目，然后在弹出的界面中选择Standard.EXE选项。接着在Project菜单项下，选择Property属性选项；在general选项下，将Project Name改为send-email，并将Form名称及Caption更改为send-email。随后在屏幕的Form上加入一个MAPImessage control，取名为MAPIm1；加入一个MAPIsession control，取名为MAPIs1；加入三个textbox control，取名为subject、content、addr。并在三个textbox前各加入一个Label，将Caption分别改为subject、content、addr。接着我们再将MAPIm1的各项property设置如下： 　　　download mail=TRUE 　　　logoUI= TRUE 　　　newsession=FALSE 　　　username="888" 　　这里将download mail设置为TRUE，当程序和mail server第一次连接时，会将新的mail download到local端。将logoUI设置为TRUE，则当您程序中logon名称输入错误时，系统会显示一个Message Box来让您输入正确的名称。由于这个程序仅使用到一条session，我们将它的值设置成FALSE。当然啦！如果您有许多session要建立的话，也可以将它设置成TRUE。 username中所填的，是我们在Exchange中所新增的设置文件名称；如果没有填内容的话，系统将会显示一些message box请您输入文件。接下来在屏幕的Form上加入三个Button control，logon、logoff与send，分别将Caption改为log on、log off、send。 　　在 logon_Click()中加入以下程序代码，这个动作是使我们登录到mail server。 　　　MAPIS1.SignOn 　　　MAPIM1.SessionID = MS1.SessionID 　　　MsgBox "your id is" + Str(MS1.SessionID) 在该段原代码中，MS1.SignOn表示作登录的动作。在登录时，因为已经将MAPIm1 control的download mail属性设置为TRUE，所以可以在屏幕上看到message box显示系统正在download mail。登录成功后，系统会传回一个sessionID，将该ID填入MAPIM1的SessionID中，这样就可以利用这条session来传送E-mail。 　　在 logoff_Click()中加入以下程序代码，这个动作是使我们离开mail server。 　　　MAPIS1.SignOff 　　在 send_Click()中加入以下程序代码，这个动作是使我们发送邮件。 
    MAPIM1.Compose 
    MAPIM1.RecipDisplayName = addr.text 
    MAPIM1.AddressResolveUI = True 
    MAPIM1.MsgSubject = subject.text 
    MAPIM1.MsgNoteText = content.text 
    MAPIM1.Send 
    MsgBox "successfully sending " 
    　　该段代码中的Compose命令主要是用来让您可以改变RecipDisplayName的内容，将所需传送的E-mail地址、主题、文章内容分别填入RecipDisplayName、MsgSubject、MsgNoteText，接着用send命令发送。 　　好了，到了这里我们就把邮件的发送部分设计好了。下面我们再来谈谈如何设计邮件的接收部分。按照同样的方法，在VB界面中，选择File选项中的New Project，然后选择“Standard.EXE”选项。接着在Project下，选择Property属性选项；在general选项下，将Project Name改为get-email，并将FORM名称及Caption更改为get-email。下面，我们再在屏幕的Form上加入一个MAPImessage control，取名为MAPIm1；加入一个MAPIsession control，取名为MAPIs1；加入三个Textbox control，分别取名为subject、content、indexno， 将其Caption改为mail-subject、mail-content、indexno；并在TextBox前各加入一个Label control，将Caption分别改为subject、content、indexno。接着再将MAPIm1的各项property设置如下： download mail=TRUE 
    logoUI=TRUE 
    newsession=FALSE 
    username="888" 
    　　随后，我们在屏幕的Form上加入一个Buttoncontrol get-mail，将Caption改为get mail。如同发送mail 程序部分和mailserver建立一条session。 　　在 get-mail_Click() 中加入以下程序代码，这个动作是使我们接收邮件。 MAPIM1.Fetch 
    Form1.Caption=MAPIM1. MsgCount 
    MAPIM1.MsgIndex=CINT(indexno.text) 
    subjec.Text = MM1.MsgNoteText 
    content.Text = MAPI1.MsgSubject 
    　　其中Fetch命令是将信件取到系统存贮器的inbuffer中。我们将信件取回来后，可以由MsgCount property知道信件数量，接着可以用MsgIndex设置要看哪一封信件的内容、标题，这样邮件的接受部分也就结束了。
      

  3.   

    看看我在这个帖子里写的.应该有帮助
    http://community.csdn.net/Expert/topic/3844/3844551.xml?temp=.2866938基本原理就是使用邮件交换服务器的邮件转发功能.看了以后,用telnet都可以试试发匿名邮件.
      

  4.   

    在你的IE浏览器地址栏里写telnet:mx.mail.163.com 回车
    下面就是用发送一次匿名邮件的记录.这些过程完全可以用程序实现.220 Coremail SMTP(Anti Spam) System (163com[20050206])
    HELO 163.com   //注意这里的域,一定要同你要发送的邮件地址的域一样
    250 mx12
    MAIL FROM:[email protected] //注意邮件地址不能同邮件服务器域一至,服务器要做邮件地址有效性检查.
    250 Ok
    RCPT TO:[email protected]  //这里的邮件地址也要有效!因为同样服务器要做检查.
    250 Ok
    DATA
    354 End data with <CR><LF>.<CR><LF>
    QUIT
      

  5.   

    你们哪个回答楼主的问题了？
    楼主明明说“如何不用MAPI或其他第三方控件”，而“junki(『打破沙锅问到底』) ”却偏偏要用MAPI
    楼主明明说“smtp服务器需要进行身份认证”，而“jlum99(闲人)”却偏偏不进行验证
      

  6.   

    呵呵,对啊,楼上的断章取意而且不晓得变通...
    "而用WinSock来编写邮件发送程序，smtp服务器需要进行身份认证。 "
    楼主是在抱怨winsock写发送程序需要验证,我就告诉他不需要验证的方法,有错么???你到是正面回答啊?
      

  7.   

    还有上面的 telnet:mx.mail.163.com改成telnet:mx.mail.163.com:25缺少端口号
      

  8.   

    楼主是在抱怨winsock写发送程序需要验证？有可能么？
    还是请楼主自己说明吧
      

  9.   

    兄弟们。谢谢大家，不过不要争吵啊/ 不用MAPI用winsock主要是为了免除程序分发的麻烦，碰到的困难是现在的邮件发送服务器一般都要求身份验证的，找到的几个邮件发送程序例子都没涉及到身份验证
    是怎么实现的，所以来这里请弟兄们给个思路，各位不要争吵，伤了和气在下担待不起。
      

  10.   

    恩，那么楼主就不是在抱怨winsock写发送程序需要验证，而是需要验证的方法。
      

  11.   

    那么建议楼主看看这篇文章：
    http://www.5dmail.net/html/2003-10-4/2003104124138.htm