Fórum Ainda tenho problemas com envio de email #204412
06/01/2004
0
Não posso usar componentes do delphi para fazer a conexão, porque não consigo me conectar usando adsl;
tenho que usar o outlook, mas enviando todos os parametros: Destinatário, meu email, assunto, mensagem, anexos;
E na hora em que eu fizer a chamada do outlook ele tem que abrir e me mostrar todos os dados que enviei.
Se alguém souber agradeço!!!
Rafael Carneiro
Rafaelfcarneiro
Curtir tópico
+ 0Posts
07/01/2004
Rock.it
sem usar o outlook, e independente da conexão ser discada ou adsl
[]s
:arrow: rock.it
Gostei + 0
26/01/2004
Paulo Trajano
Cara, com certeza vc vai ajudar muito. Dá pra mandar essa explicação pra mim?
Gostei + 0
26/01/2004
Rock.it
Cara ta ai o codigo, para enviar use um IdMessage e um idSMTP, ambos da palheta indy. Ahh versão da minha indy é a 8, acho q 9 e na 10 é diferente(não tenho certeza) não custa nada tentar né?! :wink:
Msg.Clear;
Msg.ContentType := ´text/html´; // Se quiser, poder tirar esta linha. Com ela vc usa html na mensagem
Msg.From.Address := <endereco de retorno>;
Msg.ReplyTo.Add.Text := <end. de resposta>;
Msg.From.Name := <nome de quem manda>;
Msg.Subject := <assunto>;
Msg.Recipients.Clear;
Msg.Recipients.EMailAddresses := <end e-mail destinatario>;
Msg.BccList.Clear;
Msg.BccList.Add.Address := <com copia oculta>;
Msg.Body.Add(´<font face="Verdana" size="2">´);//Aqui to usando html para formatar o corpo da mensagem, so da certo se o contenttype for igual a "text/html"
Msg.Body.Add(´Lah lah Clube do delphi.....<br>´);
Msg.Body.Add(´</font>´);
idSMTP1.UserId := <ind. do usuario> //alguns servers tem q ser o e-mail inteiro, caso do UOL
idSMTP1.Password := <Senha>;
idSMTP1.Host := <end do server smtp>;
if Autentica then //sugiro q vc crie esta varivel para saber se precisa de autenticação ou não
idSMTP1.AuthenticationType := atLogin // faz autenticacao antes de enviar a mensagem
else
idSMTP1.AuthenticationType := atNone;
if not idSMTP1.Connected then
idSMTP1.Connect;
try
idSMTP1.Send(Msg);
finally
idSMTP1.Disconnect;
end;
Qq dúvida, estamos ai!
8) rock.it
´feliz aniverssário, envelheço na cidade.......´
Gostei + 0
26/01/2004
Paulo Trajano
Tem certeza que só precisa isso mesmo né? Camarada, já tô tão frustado com minhas tentativas que já ando traumatizado. Mas valeu, vou tentar e te retorno , falow?
A versão da Indy do D6 é a qual? Eu tô com o D6 e o D7 aqui.
Gostei + 0
26/01/2004
Paulo Trajano
if Autentica then //sugiro q vc crie esta varivel para saber se precisa de autenticação ou não
idSMTP1.AuthenticationType := atLogin // faz autenticacao antes de enviar a mensagem
else
idSMTP1.AuthenticationType := atNone;
Que tipo de variável é essa?
Gostei + 0
26/01/2004
Otto
if Autentica then
variavel booleana;
Gostei + 0
27/01/2004
Rock.it
QQ problema manda mensagem q nos ajuda! :!: !
[]s
:arrow: rock.it
´ they stolen my precious ´
Gostei + 0
27/01/2004
Paulo Trajano
Gostei + 0
27/01/2004
Rock.it
trabalho temos internet via rádio e funciona bem, testei o programa q usa
essa rotina de envio em ADSL e discada e sempre funcionou normal. Oq
sempre diferenciou foi a configuração pro servidor.
Exemplo, só consiguo enviar e-mail pelo smtp do ig se estiver conectado
pelo ig.....
Me fala o server q vc ta usando q eu testo aqui e encontramos a solução,
Blz :!: :?:
[]s
Gostei + 0
27/01/2004
Paulo Trajano
Gostei + 0
27/01/2004
Rock.it
vou criar um e-mail no yahoo e vou testar.....
Daqui a pouco eu volto!!
:arrow: :!:
Gostei + 0
19/02/2004
Nerdex
Tenho ADSL no modo Router e meu provedor é o Terra. No meu programa de e-mail, logado no smtp.sma.terra.com.br (ou nº IP deste mesmo), somente consigo enviar para mim mesmo.
Gostaria de saber, se a solução é a parada da Autenticação, ou se existe a possibilidade das portas do modem estarem bloqueadas.
Acho que portas bloqueadas não seriam, pois estou requisitando uma coisa de fora ?! não é ?
Por favor......ajuda.........
Gostei + 0
19/02/2004
Nerdex
Tenho ADSL no modo Router e meu provedor é o Terra. No meu programa de e-mail, logado no smtp.sma.terra.com.br (ou nº IP deste mesmo), somente consigo enviar para mim mesmo.
Gostaria de saber, se a solução é a parada da Autenticação, ou se existe a possibilidade das portas do modem estarem bloqueadas.
Acho que portas bloqueadas não seriam, pois estou requisitando uma coisa de fora ?! não é ?
Por favor......ajuda.........
Gostei + 0
20/02/2004
Rock.it
Vc tem que mandar ele autenticar com atLogin.
O programa q desenvolvemos envia sucessagado pelo yahoo, terra etc,
desde que as configurações estejam corretas!
Manda o erro pra gente dar um olhada.....
[]s
rock.it
Gostei + 0
20/02/2004
Paulo Trajano
Isso eu postei há quase um mês atrás, pouco antes de eu resolver esse [b:35c45403d4]pobrema[/b:35c45403d4]. Repararam no meu desespero?? hehhe :D Abaixo segue o código de envio de email com o componente NMSMTP (paleta FastNet), pq ainda não me resolvi direito com o Indy. Envio emails tranquilo com anexo e tudo o mais, tanto pra mim mesmo qto pra todo mundo.
begin
with SMTP do
begin
Host:=LabeledEdit1.Text;
UserID:=LabeledEdit2.Text;
PostMessage.FromAddress:=LabeledEdit3.Text;
PostMessage.ToAddress.Text:=LabeledEdit5.Text;
PostMessage.Subject:=LabeledEdit4.Text;
PostMessage.FromName:=´Seu Nome´;
PostMessage.Body.AddStrings(Memo1.Lines);
//tratando os arquivos anexados
PostMessage.Attachments.AddStrings(Anexados.Items);
// "Anexados" é um componente TListBox onde eu armazeno todos os
// arquivos que serão anexados pra depois jogar tudo de vez
try
if SMTP.Connected=False then
Connect;
SendMail;
ShowMessage(´Seu e-mail foi enviado com sucesso para ´+LabeledEdit5.Text+´!´)
except
ShowMessage(´Falha na conexão´);
end;
end;
end;Nerdex, na propriedade ´Host´ do componente coloque o IP do seu servidor de Internet. Temos uma rede local ADSL aqui e comigo funcionou, só faltava isso.
Qquer coisa tamos aí
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)