FASTNET控件发送邮件说我没授权????????????(50分)

  • 主题发起人 主题发起人 zhx_888
  • 开始时间 开始时间
Z

zhx_888

Unregistered / Unconfirmed
GUEST, unregistred user!
本人用FASTNET中的 NmSmtp 控件发送邮件时,总提示我未授权,好像要注册的样子,谁有解决之道?
 
估计这个可以。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=663238
来自: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;
 
天!BASE64来编用户名和密码,我不明白(还是没法发邮件)
 
BASE64编码怎么编法???
 
接受答案了.
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部