Como enviar email delphi 7

Delphi

01/02/2003

Olá gentem, estou precisando saber como posso mandar email pelos componentes do delphi 7
Antes existia a paleta FastNet, agora ferrou. Se alguem souber da o toque ai mano.


Anonymous

Anonymous

Curtidas 0

Respostas

Kandrus

Kandrus

01/02/2003

Se não me engano tem um exemplo aqui mesmo no site da Clube Delphi


GOSTEI 0
Marcelo

Marcelo

01/02/2003

Primeiro um evento onclik e digite o seginte codigo:

begin
ShellExecute(0,´Open´,´Mailto:nomedoemail@empresa.com.br´,nil,nil,1);
end;

Marcelo


GOSTEI 0
Navoid

Navoid

01/02/2003

o código passado pelo marcelo funciona, só que ele abre a janela do programa de correio padrão para o usuário clicar em enviar.

use os componentes da paleta Indy Client
se não me engano o componene é idSMTP.


GOSTEI 0
Skaarj

Skaarj

01/02/2003

- Coloquei um componente NMPOP3 e antes dos comandos do NMSMTP eu coloquei esses do NMPOP3:

//Processo de reconhecimento no POP3 do UOL
NMPOP31.AttachFilePath := ´.´;
NMPOP31.DeleteOnRead := FALSE;
NMPOP31.ReportLevel := Status_Basic;
NMPOP31.TimeOut := 20000;
NMPOP31.Host := ´pop3.uol.com.br´;
NMPOP31.Port := 110;
NMPOP31.UserID := ´MeuLogin´;
NMPOP31.Password := ´Minha Senha´;
NMPOP31.Connect;
//Conexão não feita ele sai
//Conexão feita ele desconecta e prossegue
if not NMPOP31.Connected then exit else NMPOP31.Disconnect;
//Prosseguindo ele agora tenta se conectar ao SMTP do UOL
NMSMTP1.ClearParams := TRUE;
NMSMTP1.Host := ´smtp.uol.com.br´
NMSMTP1.Port := 25;
NMSMTP1.UserID := ´MeuLogin´
NMSMTP1.Connect;
//Conexão não feita ele sai
//Conexão feita ele prossegue
If not NMSMTP1.Connected then exit;
//Processo de envio
NMSMTP1.PostMessage.Body.Clear;
NMSMTP1.PostMessage.ToAddress.Clear;
NMSMTP1.PostMessage.FromAddress := ´MeuLogin@MeuProvedor.com.br´
NMSMTP1.PostMessage.FromName := ´Meu Nome Completo´
NMSMTP1.PostMessage.Body.Add(´Teste de envio de email´);
NMSMTP1.PostMessage.Subject := (´Teste de Envio´);
NMSMTP1.PostMessage.ToAddress.Add(´destino@DestinoProvedor.com.br´);
NMSMTP1.SendMail;


GOSTEI 0
Dor_poa

Dor_poa

01/02/2003

procura o ex. do delphi..


GOSTEI 0
Nigro

Nigro

01/02/2003

como usar Indy no Delphi7?


GOSTEI 0
Edinn

Edinn

01/02/2003

Estou com uma bronca em um sistema já pronto ... com esses componentes tenho o delphi 7 mas não encontro esses componentes ...
alguem pode me ajudar?

valeu...


GOSTEI 0
Xjulio

Xjulio

01/02/2003

Vouce vai ter que procurar o tsmtp em um dos componetes que nao vem instalados , eu ja consegui uma vez mas prefiro usar o delphi 6


GOSTEI 0
Otto

Otto

01/02/2003

Estou com uma bronca em um sistema já pronto ... com esses componentes tenho o delphi 7 mas não encontro esses componentes ... alguem pode me ajudar? valeu...



utilize os Componentes da paleta Indy do delphi 7, caso tenha problemas, veja esta dica:
:arrow: http://www.clubedelphi.net/EMails.html

:wink:


GOSTEI 0
POSTAR