我前天正好看到一个用nmsmtp发送需服务器需要验证的方法，不过帖子的ID我忘了。只有我当初
保留的内容，贴给你吧，或者你再搜索一下原贴。
问题：nmsmtp能否在有用户认证要求的邮箱传送了邮件? ( 积分：100, 回复：16, 阅读：111 )
分类：Internet/TCPIP ( 版主：luyear, robertcool )
来自：netup, 时间：2001-10-9 16:43:00, ID：663238 [显示：小字体 | 大字体]
nmsmtp能否在有用户认证要求的邮箱传送了邮件? 如www.163.com or www.163.net等
邮箱, 都这样了, 我以前有nmsmtp&nmpop实现的发送和接收邮件程序现在不能用了, 因为它
在发送邮件时, 总是会出现用户认证失败(555 <netup@163.com> invalid user). 老板等着
我升级, 我怎么升? 快帮帮我啦, 兄弟们.(100分)
来自：hpn_cao(小海), 时间：2001-10-10 11:57:00, ID：664327
不行，nmsmtp不支持用户验证，建议用Indy。
来自：netup, 时间：2001-10-10 12:14:00, ID：664353
indy我也知道行， 我是想有没有FastNet的升级版for D5，可以支持用户认证， 这样
我的程序就不用修改。
来自：whg972, 时间：2001-10-16 11:32:00, ID：675451
你用D6中的INDY的类子程序，也不需要改多少，估计一天就一切OK了!
计算机就这样，为什么还要抱着旧的东西不放呢，不去学习一下新的东西呢？
来自：netup, 时间：2001-10-17 19:01:00, ID：678239
那还不如我将indy改一个d5版有用呢?
来自：suhaiyun, 时间：2001-10-17 22:25:00, ID：678552
用INDY for D5不就解决问题了吗
来自：狼牙, 时间：2001-10-17 23:02:00, ID：678589
fastnet有。要钱。
来自：dana, 时间：2001-10-18 9:20:00, ID：678862
关注
来自：netup, 时间：2001-10-18 17:00:00, ID：679741
to fastnet:
对不起老兄, 我自己也搞定了, 看来我不能给你了, 因为你太重錢了, 如果你贴出来
给大家分享, 我同样会给你的....
to dana:
用smtp从nmpower继承下来的方法transaction传送smtp的认证命令, 确认认证开始后
同样方法传user & ps , 注: 此时需自己将username & password转成base64码.
来自：aaww, 时间：2001-10-19 0:03:00, ID：680359
to netup兄,我也遇到了和你同样的问题,看来你的问题已经解决了,能否帮一帮我呢,
我的QQ:485557,我也找了一段BASE64的代码加上后,有时候能够发出去，有时候又不能发出去,
我对这方面的知识不是很了解。希望能与你联系。切切！！
其他兄弟能帮我解决也好，不过不要跟我讲INDY，谁跟我讲INDY，我跟谁急！
来自：dana, 时间：2001-10-19 8:54:00, ID：680549
你用的是NMSMTP控件吗？你是如何通过的？能否将代码贴出？
来自：netup, 时间：2001-10-22 9:53:00, ID：685130
to all:
please your email to me, ok?
来自：MicroFish, 时间：2001-11-26 14:51:00, ID：751516
我告诉大家:
procedure TForm1.NMSMTP1Connect(Sender: TObject);
begin
//////连接成功，下面用户认证过程
label1.caption:=nmsmtp1.Status;
if nmsmtp1.ReplyNumber = 250 then
label1.caption:=nmsmtp1.Transaction('auth login'); //开始认证
if nmsmtp1.ReplyNumber =334 then //返回值为334，让你输入用BASE64编码后的用户名
label1.caption:=nmsmtp1.Transaction('YWFhYWE=');// 用户名aaaaa
if nmsmtp1.ReplyNumber =334 then // 返回值为334，让你输入用BASE64编码后的用户密码
label1.caption:=nmsmtp1.Transaction('MTIzNDU2'); //密码为123456
if nmsmtp1.ReplyNumber =235 then
begin
label1.caption:='successful';
AuthSucc:=true;
end;
//showmessage(label1.caption);
end;
