Ir para conteúdo
Fórum Script Brasil
  • 0

Delphi 5.0 - (RESOLVIDO)


Guest Adriano Renato

Pergunta

Guest Adriano Renato

Pessoal,

Queria saber como faço para enviar email com cópia (Oculta ou não)

Eu envio, assim:

ShellExecute(GetDesktopWindow,'open',pchar('mailto:'+ Email),nil,nil,sw_ShowNormal);

O que precisa mudar para enviar com cópia??

Obrigado...

Adriano

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

procurando no google vi que usa-se:

mailto:principal@dominio.com?cc=Secundario@dominio.com&subject=Assunto
Então tenta assim:
ShellExecute(GetDesktopWindow,'open',pchar('mailto:'+ Email + '?cc=' + EmailSecundario + '&subject=' + Assunto),nil,nil,sw_ShowNormal);

Sacou? Se funcionar da um toque ai!

Se quiser dar uma olhada no artigo: http://developer.netscape.com/viewsource/h...lto/mailto.html

Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...