Dúvidas EnviarEmail()

[Denilson_AutoLogic]

Estou utilizando a rotina Enviaremail(string ePara, string eAssunto, string eMensagem, string eCC).

Dúvidas:

1) para enviar para mais de um destinatario(ePara) ou com cópia (ecc), como faço?

Separo por virgulas? Ex.: [email protected], [email protected]

2)Como coloco o nome e o email, ex.: fulano1 da silva <[email protected]> ?

3)Como faço quebra de linhas no campo eMensagem:

ex.:

            'Prezado Fulano1,

             Segue anexo boleto.

             Atenciosamente,

 

              Remetente'

 

4) Como faço para anexar um arquivo imagem(jpg) com a assinatura do remetente?

 

5) Onde encontro material para estudar isso tudo?

 

 

 

 

 

[Diego Foliene]

Bom dia!

18 horas atrás, Denilson_AutoLogic disse:

Dúvidas:

1) para enviar para mais de um destinatario(ePara) ou com cópia (ecc), como faço?

Separo por virgulas? Ex.: [email protected], [email protected]

Sim, você vai utilizar o ; para separar, mas veja no comando são parâmetros diferentes, você tem um parâmetro para o destinatário e um parâmetro para cópia oculta.

Então ficaria.

EnviarEmail('[email protected];[email protected]", "Assunto", "Mensagem", "[email protected];[email protected]")

Neste exemplo, o fulano1 e o fulano2 são destinatários já o fulano3 e 4 são cópia oculta.

18 horas atrás, Denilson_AutoLogic disse:

2)Como coloco o nome e o email, ex.: fulano1 da silva <[email protected]> ?

Não existe.

Essa visualização é feita pelo client que recebeu o e-mail.

Acabei de realizar um teste utilizando o exemplo de boleto, preenchi apena o endereço de e-mail do destinatário, mas veja como ficou em minha caixa de entrada.

18 horas atrás, Denilson_AutoLogic disse:

3)Como faço quebra de linhas no campo eMensagem:

ex.:

            'Prezado Fulano1,

             Segue anexo boleto.

             Atenciosamente,

 

              Remetente'

O campo eMensagem recebe um TStrings como parâmetro.

Veja código retirado do programa exemplo do ACBrBoleto:

var
  SL: TStringList;
  //i: Integer;
begin
  AplicarConfiguracoesComponenteEmail;
  SL := TStringList.Create;
  try
    SL.Add('Olá,');
    SL.Add('Atenção, Boleto está em Anexo');
    FACBrBoleto.EnviarEmail(edtEmail.Text ,'Teste de Envio de Email', SL, True);

    //Método para envio e-mail de forma individual para cada título
    {for i := 0 to FACBrBoleto.ListadeBoletos.Count -1 do
    begin
      if (FACBrBoleto.ListadeBoletos[i].Sacado.Email <> '') then
        FACBrBoleto.ListadeBoletos[i].EnviarEmail(FACBrBoleto.ListadeBoletos[i].Sacado.Email ,'Teste de Envio de Email', SL, True);

    end;}

  finally
    SL.Free;
  end;

 

18 horas atrás, Denilson_AutoLogic disse:

4) Como faço para anexar um arquivo imagem(jpg) com a assinatura do remetente?

Você precisa ter o arquivo de jpg salvo em disco e passar o caminho completo dele no parâmetro do comando que recebe os anexos.

var
  SL, Anexos: TStringList;
  //i: Integer;
begin
  AplicarConfiguracoesComponenteEmail;
  SL := TStringList.Create;
  Anexos := TStringList.Create;
  try
    SL.Add('Olá,');
    SL.Add('Atenção, Boleto está em Anexo');
    
    Anexos.Add('C:\\Users\Fulano\MinhasImagens\MinhaAssinatura.jpg');
    FACBrBoleto.EnviarEmail(edtEmail.Text ,'Teste de Envio de Email', SL, True, nil, Anexos);

  finally
    SL.Free;
    Anexos.Free
  end;
end;

 

18 horas atrás, Denilson_AutoLogic disse:

5) Onde encontro material para estudar isso tudo?

Os fontes do componente são sem sombra de dúvidas o melhor material para estudos, você pode encontrar o programa exemplo para componente nativo disponível em ..\trunk2\Exemplos\ACBrBoleto

[Denilson_AutoLogic]

Grato pela resposta.

Esqueci de mencionar que estou utilizando a linguagem C#, e no demo  a rotina ACBrBoleto.EnviarEmail() não

possui os mesmos parâmetros:

 public void EnviarEmail(string ePara, string eAssunto, string eMensagem, string eCC)
 {
     var method = GetMethod<Boleto_EnviarEmail>();
     var ret = ExecuteMethod<int>(() => method(ToUTF8(ePara), ToUTF8(eAssunto), ToUTF8(eMensagem), ToUTF8(eCC)));

     CheckResult(ret);
 }

Não consigo implementar vossas soluções...