Ver Mensaje Individual
  #3  
Antiguo 20-05-2011
Avatar de kharen
kharen kharen is offline
Registrado
NULL
 
Registrado: may 2011
Posts: 6
Reputación: 0
kharen Va por buen camino
Cita:
Empezado por Chris Ver Mensaje
Antes que todo, quiero darte la bienvenida al club.

Por otro lado, quisiera que dejarás claro a que te refieres con autenticación.
Hola chris, gracias por la bienvenida.

Respecto a enviar correos con autenticacion, y sin autenticacion:

En pocas y simples palabras es que mi aplicacion delphi debe poder enviar correos desde una cuenta de gmail o hotmail, pero me salio el error que les mostré en mi 1er post. Pero cuando pongo como correo origen a una cuenta de correo corporativo (ventas(arroba)elmar.com) sí envia correctamente.

Este es el cod q estoy usando:

mensaje := TIdMessage.Create(nil);
smtp := TIdSMTP.Create(nil);
mensaje.Subject := 'Aviso de vencimiento de pago';
mensaje.From.Name := 'ventas elmar';
Mensaje.From.Address := CorreoOrigen;
smtp.Host := smtpseguro.elmar.biz;
smtp.Port := 25;
mensaje.Body.Text := 'Estimado cliente .......................';
mensaje.ContentType := 'text/html';
smtp.Username := CorreoOrigen;
smtp.Password := Clave;
mensaje.Recipients.Add;
mensaje.Recipients[0].Address := Correo; // destinatario

smtp.Connect;
try
try
smtp.Send(mensaje);
ShowMessage('se envio correctamente a '+ Correo);
except
on E: Exception do
ShowMessage(E.Message);
end;
finally
if smtp.Connected then
smtp.Disconnect;
end;

No tengo problemas de mandar desde un correo ventas(arroba)elmar.com, pero cuando pongo como correo origen a alguien(arroba)hotmail.com, claro que tambien poniendole el respectivo smtp.Host : smt.live.com y puerto 25 no envia, sale error. Mi duda es si debo usar o agregar otro codigo para enviar correos desde gmail o hotmail.

Espero haberme dejado entender-.

Gracias


pd. (arroba) significa el arroba obtenida con alt + 64, sólo que puse (arroba) porque como es mi 2do post aún no me permiten escribir correos o links.
Responder Con Cita