Do you know how to deal it?(100分)

各位老师：
我在用的Delphi编写邮件发送程序， 当连通成功后，发送信件时出现验证错误，请问如何解决，谢谢！！
项目紧急，盼回!!!
(错误提示为：
project sendmail.exe raised exception class Exception with message '533 You are not
authorized to send mail as bravestman@163.com, authentication is required'
)

现在smtp server大多需要authentication，你的程序没有，所以出错。
论坛中已有帖子讨论，找找看。

需要Smtp验证！

邮件服务器的认证问题，新的网络控件INDY可以很好地解决此问题，下载地址：
http://download.lycos.com.cn/soft_con_internet/indy.html
http://www.nevrona.com/Indy/

例程：
procedure Tform1.SendAlarmEmail;
begin
if SMTPAuthority then //SMTPAuthority 是 表示这个SMTP服务器是否需要认证的boolean
SMTP.AuthenticationType := atLogin
else SMTP.AuthenticationType := atNone;
SMTP.UserID := mjy@371.net;//帐户
SMTP.Password := **********;//密码
{General setup}
SMTP.Host := SMTP.371.net;
SMTP.Port := 25;
try
SMTP.Connect;
except
Showmessage('连接SMTP服务器失败!');
Exit;
end;
try
with IdMsgSend do
begin
body.Clear;
Body.Add('hello world');//内容
From.Text := 'mjy@371.net';
Recipients.EMailAddresses :=mjy@sina.com'//收件人
Subject:='测试'//主题
end;
SMTP.Send(IdMsgSend);
finally
SMTP.Disconnect;
end;
end;

给分吧！ @_@