Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Servers
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 24-06-2015
Avatar de jeremiselxi
jeremiselxi jeremiselxi is offline
Miembro
 
Registrado: ago 2008
Posts: 199
Poder: 16
jeremiselxi Va por buen camino
Enviar correo mediante Outlook con otro usuario

Buen día.

Esperando se encuentren bien, comienzo de inmediato mi caso.

En la empresa donde laboro, estoy desarrollando una aplicación donde ellos guarden un tipo de información en especifica.

Entonces ellos crearon un usuario en outlook que se llama "InformaciónDeAlerta" y la contraseña "12345678" con la finalidad de que ciertos información sea enviada vía correo mediante esta cuenta a los jefes.

Buscando en adapté un código para enviar correos, pero este lo hace a través de mi propio usuario y no se como hacer para que se conecte con el usuario mencionado anteriormente.

Código Delphi [-]

procedure TRecipients.Button1Click(Sender: TObject);
const
  olMailItem = 0;
var
  Outlook: OLEVariant;
  MailItem: Variant;
  MailInspector : Variant;

begin
  try
  //Outlook:=CreateOleObject('Outlook.Application') ;
   Outlook:=GetActiveOleObject('Outlook.Application') ;
  except
   Outlook:=CreateOleObject('Outlook.Application') ;
  end;
  try

    MailItem := Outlook.CreateItem(olMailItem) ;
    MailItem.Subject := Subject.Text;
    MailItem.Recipients.add(Edit_Recipients.Text);
    MailItem.Attachments.Add(ruta.Text);
    MailItem.Body := body.Text;
//    MailInspector := MailItem.GetInspector;
   // MailInspector.display(true); //true means modal
    MailItem.Send;
    ShowMessage('Enviado');
  finally
    Outlook := Unassigned;
  end;
end;

De antemano, muchas gracias quien me pueda dar una mano.

Saludos.
__________________
Cristo te ama, ven a d él, ya k te espera con los brazos abiertos. Dios te bendiga mucho
Responder Con Cita
  #2  
Antiguo 26-06-2015
Avatar de Ñuño Martínez
Ñuño Martínez Ñuño Martínez is offline
Moderador
 
Registrado: jul 2006
Ubicación: Ciudad Catedral, Españistán
Posts: 6.000
Poder: 25
Ñuño Martínez Tiene un aura espectacularÑuño Martínez Tiene un aura espectacular
Ese código lo envía con tu usuario porque estás usando la aplicación Outlook instalada en tu computadora mediante OLE. Si lo usa tu cliente, usará la aplicación Outlook instalada en su computadora. Que use tu usuario u otro dependerá de la configuración del Outlook que esté instalado.

Como consejo, no uses OLE, no sólo porque está obsoleto sino porque dependerá siempre de si Outlook está o no instalado en la computadora. Es mejor usar alguna biblioteca como Indy o Synapse, que es capaz de conectar directamente con el servidor de correo y hacer el trabajo sin necesidad de instalar Outlook.
__________________
Proyectos actuales --> Allegro 5 Pascal ¡y Delphi!|MinGRo Game Engine
Responder Con Cita
  #3  
Antiguo 26-06-2015
Avatar de jeremiselxi
jeremiselxi jeremiselxi is offline
Miembro
 
Registrado: ago 2008
Posts: 199
Poder: 16
jeremiselxi Va por buen camino
Cita:
Empezado por Ñuño Martínez Ver Mensaje
Es mejor usar alguna biblioteca como Indy o Synapse, que es capaz de conectar directamente con el servidor de correo y hacer el trabajo sin necesidad de instalar Outlook.
excelente hermano muchas gracias.
__________________
Cristo te ama, ven a d él, ya k te espera con los brazos abiertos. Dios te bendiga mucho
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Enviar correo con remitente distinto al usuario con indy hugobenitez Internet 1 20-09-2013 14:35:06
Duda de como repartir correo en Outlook Express Namaris Windows 1 28-01-2007 19:30:43
ENVIAR CORREO mi cuenta de correo es GMAIL ASAPLTDA PHP 1 16-11-2006 01:54:03
Enviar correo electronico mediante MAPI adebonis API de Windows 3 12-10-2006 09:38:25
Problemas al Enviar Correo con Ciertas Dir. de Correo AGAG4 Internet 2 01-02-2006 21:37:42


La franja horaria es GMT +2. Ahora son las 02:20:25.


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