Jump to content
Fórum Script Brasil
  • 0

Delphi 5.0 - (RESOLVIDO)


Guest Adriano Renato

Question

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 to comment
Share on other sites

2 answers to this question

Recommended Posts

  • 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 to comment
Share on other sites

Guest
This topic is now closed to further replies.


  • Forum Statistics

    • Total Topics
      152.2k
    • Total Posts
      651.8k
×
×
  • Create New...