delphi中如何用idsmtp发email? 需要服务器验证的那种? ( 积分: 50 )

delphi中如何用idsmtp发email? 需要服务器验证的那种?

谢谢.

全文检索不行啊?

要服務器驗証的，肯定要先得在服務器上開一用戶名才行啊

begin
IdMessage1.From.Address := 'yu*****@163.com';
IdMessage1.Recipients.Add.Address := 'zqw****@sina.com';
IdMessage1.Sender.Address := 'yu*****@163.com';
IdMessage1.Body.Add('Test');
IdMessage1.Subject := 'Test';
IdSmtp1.Username := 'yu*****@163.com';
IdSMTP1.Password := '********************';
IdSMTP1.Connect;
try
IdSMTP1.Send(IdMessage1);
finally
IdSMTP1.Disconnect;
end;
end;

这是别人写的代码，我还没试过，不知能不能发到163等网站，你试试吧