none
Outlook: Cambiar el remitente RRS feed

  • Pregunta

  • Buenas tardes, a ver si alguien puede echarme una mano. Estoy probando un código que funciona a la perfección. El problema es que tengo varias cuentas en Outlook 365 y no sé cómo cambiar para que no me lo envíe desde la predeterminada. ¿Cómo puedo indicarle de qué cuenta enviar? Expongo el código:

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
    Dim oApp As New Microsoft.Office.Interop.Outlook.Application
    Dim oMsg As Microsoft.Office.Interop.Outlook._MailItem
    oMsg = oApp.CreateItem(Microsoft.Office.Interop.Outlook.O lItemType.olMailItem)
    oMsg.Subject = "Encabezado" 'Asunto
    oMsg.Body = "Cuerpo" 'Contenido
    oMsg.To = "emaildestinatario" 'registro.Cliente.Email
    oMsg.Display() 'Muestra el mensaje
    oMsg.Send() 'Envía el mensaje
    MessageBox.Show("Código terminado")
    End Sub

    ¡Muchas gracias de antemano!
    viernes, 19 de octubre de 2018 16:50

Respuestas

  • Revisa las propiedades

    - Sender: https://docs.microsoft.com/es-es/dotnet/api/microsoft.office.interop.outlook._mailitem.sender?view=outlook-pia#Microsoft_Office_Interop_Outlook__MailItem_Sender

    - SendUsingAccount: https://docs.microsoft.com/es-es/dotnet/api/microsoft.office.interop.outlook._mailitem.sendusingaccount?view=outlook-pia

    domingo, 21 de octubre de 2018 10:10
  • Buenas tardes,

    Lo he resulto con esta línea de código (por si a alguien le puede valer):

     oMsg.SendUsingAccount = oApp.Session.Accounts.Item("emailremitente")

    A tener en cuenta que si hemos creado un nuevo corro en Outlook, tarda un poco en digamos asentarse todo, teniendo que por ejemplo cerrar y abrir de nuevo el programa.

    Gracias por todo!

    jueves, 25 de octubre de 2018 15:56

Todas las respuestas

  • Revisa las propiedades

    - Sender: https://docs.microsoft.com/es-es/dotnet/api/microsoft.office.interop.outlook._mailitem.sender?view=outlook-pia#Microsoft_Office_Interop_Outlook__MailItem_Sender

    - SendUsingAccount: https://docs.microsoft.com/es-es/dotnet/api/microsoft.office.interop.outlook._mailitem.sendusingaccount?view=outlook-pia

    domingo, 21 de octubre de 2018 10:10
  • Le echo un ojo. ¡Gracias!
    martes, 23 de octubre de 2018 20:06
  • Buenas tardes,

    Lo he resulto con esta línea de código (por si a alguien le puede valer):

     oMsg.SendUsingAccount = oApp.Session.Accounts.Item("emailremitente")

    A tener en cuenta que si hemos creado un nuevo corro en Outlook, tarda un poco en digamos asentarse todo, teniendo que por ejemplo cerrar y abrir de nuevo el programa.

    Gracias por todo!

    jueves, 25 de octubre de 2018 15:56