Enndereço de E-Mail - Validar e enviar mala-direta
30/08/2004
0
Pessoal
1.
Alguem tem uma rotina para validar um endereço de e-mail que será preenchido em um Edit e será armazenado no banco de dados.
2.
Depois também preciso realizar o envio de uma mala-direta através do programa de e-mail Padrão do cliente (que pode ser Outollok, Eudora, etc..). Como faço pra abrir uma nova mensagem e colocar todos os registros de um Table no campo endereço e já preencher o Assunto tb.
agradecido
Diogo
1.
Alguem tem uma rotina para validar um endereço de e-mail que será preenchido em um Edit e será armazenado no banco de dados.
2.
Depois também preciso realizar o envio de uma mala-direta através do programa de e-mail Padrão do cliente (que pode ser Outollok, Eudora, etc..). Como faço pra abrir uma nova mensagem e colocar todos os registros de um Table no campo endereço e já preencher o Assunto tb.
agradecido
Diogo
Diogoalles
Curtir tópico
+ 0
Responder
Posts
30/08/2004
Edmarss
Exemplo de testar eu não tenho mas para mandar use essa.
Var
vMailItem, OutLook: Variant;
begin
vMailItem:=Outlook.CreateItem(olMailItem);
vMailItem.Recipients.Add(´teste@teste.com.br´); // 1o Destin.
vMailItem.
vMailItem.Subject:=´teste de email´; // assunto
vMailItem.Body:=´Isto é um teste´; // corpo
vMailItem.Attachments.Add(´c:\teste.zip´); // arq anexo
vMailItem.Send;
VarClear(Outlook);
Var
vMailItem, OutLook: Variant;
begin
vMailItem:=Outlook.CreateItem(olMailItem);
vMailItem.Recipients.Add(´teste@teste.com.br´); // 1o Destin.
vMailItem.
vMailItem.Subject:=´teste de email´; // assunto
vMailItem.Body:=´Isto é um teste´; // corpo
vMailItem.Attachments.Add(´c:\teste.zip´); // arq anexo
vMailItem.Send;
VarClear(Outlook);
Responder
31/08/2004
Diogoalles
olá ´edmarss´,
não consegui enviar da maneira q voce mandou!
como eu chamo a aplicação de e-mail default do usuario?
poderia me dar mais alguma dica?
abraço
não consegui enviar da maneira q voce mandou!
como eu chamo a aplicação de e-mail default do usuario?
poderia me dar mais alguma dica?
abraço
Responder
Clique aqui para fazer login e interagir na Comunidade :)
