Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-07-2015
aposi aposi is offline
Miembro
 
Registrado: dic 2006
Posts: 146
Poder: 18
aposi Va por buen camino
Hola,
tal vez necesitat una conexio segura
revisa este codigo:

Código Delphi [-]
procedure TForm2.enviarmail;
var
  SMTP: TIdSMTP;
  Email: TIdMessage;
  SSLHandler: TIdSSLIOHandlerSocketOpenSSL;
  
begin
 

  SMTP := TIdSMTP.Create(nil);
  Email := TIdMessage.Create(nil);
  SSLHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);

  try
    SSLHandler.MaxLineAction := maException;
    SSLHandler.SSLOptions.Method := sslvTLSv1;
    SSLHandler.SSLOptions.Mode := sslmUnassigned;
    SSLHandler.SSLOptions.VerifyMode := [];
    SSLHandler.SSLOptions.VerifyDepth := 0;
    SMTP.IOHandler := SSLHandler;
    SMTP.Host := 'smtp.gmail.com';
    SMTP.Port := 587;
    SMTP.Username := 'USUARIO';
    SMTP.Password := '********';
    SMTP.UseTLS := utUseExplicitTLS;
    Email.From.Address := 'REMITENTE';
    Email.Recipients.EmailAddresses := A QUIEN ENVIAS';
    Email.Subject := 'ASUNTO';
    Email.Body.Add('texto del correo');
    SMTP.Connect;
    SMTP.Send(Email);
    SMTP.Disconnect;

  finally
    SMTP.Free;
    Email.Free;
    SSLHandler.Free;
  end;
end;


Necesitaras las librerias de openssl
https://www.openssl.org/related/binaries.html
Responder Con Cita
  #2  
Antiguo 01-07-2015
Avatar de jeremiselxi
jeremiselxi jeremiselxi is offline
Miembro
 
Registrado: ago 2008
Posts: 199
Poder: 16
jeremiselxi Va por buen camino
Cita:
Empezado por aposi Ver Mensaje

Necesitaras las librerias de openssl
https://www.openssl.org/related/binaries.html
Gracias por responder tan rápido, sin embargo estoy perdido con estas librerías, solo tengo que descargarla y colocarlo en la misma carpeta de mi ejecutable? o tengo que enlazarla con algún componente?
__________________
Cristo te ama, ven a d él, ya k te espera con los brazos abiertos. Dios te bendiga mucho
Responder Con Cita
  #3  
Antiguo 02-07-2015
aposi aposi is offline
Miembro
 
Registrado: dic 2006
Posts: 146
Poder: 18
aposi Va por buen camino
dejar las librerias en la carpeta del ejecutable
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Como Configuro IIS para Intraweb tulio Internet 3 13-08-2010 16:51:05
NCR 7875 escaner y balanza. ¿como la configuro y programo? Chogo Varios 6 20-02-2008 21:14:33
Como configuro a mysql en windows... Arturo MySQL 6 05-02-2008 00:20:13
Como Instalo Y Configuro Saint? xThe-BesTx Conexión con bases de datos 0 08-03-2007 17:03:15
Como configuro MySQL para trabajar en delphi? desve MySQL 7 23-11-2006 20:04:59


La franja horaria es GMT +2. Ahora son las 04:24:33.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi