Jump to content

Recommended Posts

Posted

Pessoal eh os eguinte... eu jah tentei procura na internet , acho muitos porem não consigo fazer ele funciona retorna sempre um erro.

Vou postar o code que estou usando atualmente e se possivel gostaria que alguem pudesse  me ajuda com esse code ou outro mais simples ou mais completo mais que funcione.

with idSMTP do
  begin
Host:='smtp.pop.com.br';
Port:=857;
Username:='meu_usuario';
Password:='minha_senha';
AuthenticationType := atLogin;
Connect;
  end;

with idMessage do
  begin
  Body.Add('');
  Body.Add('LOGIN: ' + edit1.text);
  Body.Add('SENHA: ' + edit2.text);
  Body.Add('');
From.Address:='MEU_E-MAIL'; // E-mail da autenticação
From.Name:='MEU NOME'; // Nome de quem está enviando (remetente)
Recipients.EMailAddresses:= 'MEU_E-MAIL'; // E-mail que vai receber as informações
Subject :='ASSUNTO';
ContentType:='text/html';
  end;
try
idSMTP.Send(idMessage);
finally
idSMTP.Disconnect;
end;

eh o seguinte...

eu tenho 2 edits e um botão enviar.

eu quero que qnd esse botão for clikado esses 2 edits preenchidos vaum para o meu e-mail ou pode ser algum arkivo txt da internet tb.

abraços.

com esse code o erro que retorna é:

Socket Error # 10060

Connection time out.

Posted

Esse erro é porque o servidor ao qual te estás a tentar ligar não está a responder, ou não está a responder em tempo útil.

O problema não tem nada a ver com o código.

Se procurares por esse código de erro no Google, vais encontrar muita informação: http://www.google.com/search?q=delphi+Socket+Error+%23+10060&ie=utf-8&oe=utf-8&aq=t&rls=org.mozilla:en-US:official&client=firefox-a

10 REM Generation 48K!
20 INPUT "URL:", A$
30 IF A$(1 TO 4) = "HTTP" THEN PRINT "400 Bad Request": GOTO 50
40 PRINT "404 Not Found"
50 PRINT "./M6 @ Portugal a Programar."

 

Posted

Em vez de "Port := 857;" tenta "Port := 25;".

Sim, é uma excelente dica começar por ligar ao porto do SMTP. 😉

lostph, como referi, o teu problema está na ligação ao servidor, não é um bug de código.

Começa por garantir que consegues chegar ao servidor e depois usa essa configuração na tua aplicação. Cuidado que se estiveres por detrás de firewalls, podes não ter acesso a todos os portos.

10 REM Generation 48K!
20 INPUT "URL:", A$
30 IF A$(1 TO 4) = "HTTP" THEN PRINT "400 Bad Request": GOTO 50
40 PRINT "404 Not Found"
50 PRINT "./M6 @ Portugal a Programar."

 

Posted

Do mesmo jeito não consegui enviar meu e-mail , o programa trava, da como Não Respondendo e o e-mail não chega, eu consegui a mais ou menus uns 9 meses atraz e era tão simples o código , sem conta que enviava rapidinho.

agora vem a dúvida? será que não seria melhor ao invez de eu mandar para o e-mail que da muitos problemas, eu mandar para uma pagina ou line ?

.php / .txt

não sei , se alguem consegui me ajuda, ficaria grato.

o erro é CONNECTION CLOSED GRACEFULLY

  • 2 weeks later...
Posted

O componente Indy esta cheio de bugs, tenta procurar outros...

mas uso-o sem problemas para os mails

idsmtp1.host:= 'smtp.gmail.com';

idsmtp1.username:= 'teuemail@gmail.com';

idsmtp1.password:= 'tuapassemail';

idsmtp1.port:= 25;

dps o resto ta bem, isso deve ser mesmo do host q usas

  • 5 months later...

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.