Como abrir cliente de e-mail padrão ???
27/02/2003
0
Como faço para abrir o cliente de e-mail padrão??? e além de abrir, como faço para preencher alguns campos (to:, subject:, body:...) com valores pré-definidos???
Gostaria de colocar um botão em um Form de cadastro de clientes, onde bastaria o usuário clicar para que fosse aberto o Outlook, Netscape, Eudora... e que alguns campos já viessem preenchidos com valores do cadastro desse cliente!!!
[]´s
Rodrigo Duarte
Gostaria de colocar um botão em um Form de cadastro de clientes, onde bastaria o usuário clicar para que fosse aberto o Outlook, Netscape, Eudora... e que alguns campos já viessem preenchidos com valores do cadastro desse cliente!!!
[]´s
Rodrigo Duarte
Anonymous
Curtir tópico
+ 0
Responder
Posts
27/02/2003
Navoid
use assim
// declare na clausula uses a unit sehllapi
****
procedure envia_email(email, assunto, mensagem: string);
begin
shellexecute(0, ´open´, ´mailto:´+email+´?subject=´+assunto+´&body=´+mensagem, ´´, ´´, SW_SHOW);
end;
****
até
// declare na clausula uses a unit sehllapi
****
procedure envia_email(email, assunto, mensagem: string);
begin
shellexecute(0, ´open´, ´mailto:´+email+´?subject=´+assunto+´&body=´+mensagem, ´´, ´´, SW_SHOW);
end;
****
até
Responder
Clique aqui para fazer login e interagir na Comunidade :)