如何运用Indy控件实现一封信发给多人（邮件列表）？(100分)

我的程序是这样实现的：（在邮件列表ListBox1少的时候没问题，多起来就报553：wo don't accept this recipient）
高手请教一下！谢了！
{ 根据用户所填写的内容创建邮件 }
with IdMsgSend do
begin
Body.Assign(LOG.Lines ); //邮件正文
From.Address := Trim(PassFrm.Table2['Email1']); //发件人地址
Subject := DateToStr(Date_edit.Date)+' '+Kind.Text + ' '
+ Zb1.Text +' '+Zb2.Text + ' '+Zb3.Text ; //邮件主题
end;
{ 发送邮件 }
with IdSMTP do
begin
Host := 'mail.fjtv.net';
Port := 25; // smtp服务默认的端口为25
Connect; //连接到服务器
try
for i:=0 to ListBox1.Items.Count -2 do
begin
IdMsgSend.Recipients.EMailAddresses :=Trim(ListBox1.Items.Strings);//收件人地址
Send(IdMsgSend); //发送刚才创建的邮件
end;
finally
Disconnect; //断开服务器连接
end;
end;
ShowMessage('发送完毕'); //发送完毕后提示

没人回答，这个问题我自己搞定了，主要原因是邮件列表中有不存在的Email,所以才会出现这样的错误！

结束

如果服务器要认证你怎么解决?试一下用21cn的SMTP服务器试试.再用163的SMPT试试.如果行的话才叫可以哦!