acbrMail retorna Unable to send MailTo

[alexandre.eduardo]

Srs,

Uso o D7 e estou usando a versão ACBrNFe Ver: 2.0.0a . Ocorre que sem aparente explicação a rotina abaixo começou a dar a mensagem de erro abaixo :

SMTP Error: Unable to send MailTo.

Alguma dica?

==========================================================================

procedure EnviarNotaPorEmail(pNotaXML : TFileName);
  var
    vAux : String;
    sCC  : TStrings;

  begin
    if FileExists(pNotaXML) then
    begin
      ACBrNFe.NotasFiscais.Clear;
      ACBrNFe.NotasFiscais.LoadFromFile(pNotaXML);

      sCC :=TStringList.Create;
      try
        sCC.Clear;  // Usando para add outros e-mail como Com-Cópia

        vAux := EMAIL_CLIENTE;
        acbrMail.Body.Text := sMail;

        ACBrNFe.NotasFiscais.Items[0].EnviarEmail( vAux,
                                                   'Anexo da nota fiscal número ' + GetCampoNota('NOTA').AsString,
                                                   nil                  ,
                                                   true                ,  //Enviar PDF junto
                                                   nil                  ,  //Lista com emails que serão enviado cópias - TStrings
                                                   nil                  ); // Lista de anexos - TStrings

      finally
        sCC.Free;
      end;
    end;
  end;