La Web del Programador: Comunidad de Programadores
 
https://www.lawebdelprogramador.com/preguntas/

    Pregunta:  216 - CONECTAR CON EL CORREO ELECTRONICO
Autor:  Oscar
Soy un programador novato en Visual Basic 4.0 y debo de conectarme con el correo electronico de Microsoft (exchange) o con Lotus ccMail. Pero no se como hacerlo, os agradeceria que me contestaseis por favor
  Respuesta:  Daniel Arriola
Te dejo el código:
solo que tienes que tener referenciado tú programa a la librería de Microsoft Outlook

´Inicio del programa
Dim Correo As New Outlook.Application
Dim Mensaje As Outlook.MailItem
Set Mensaje = Correo.CreateItem(olMailItem)
With Mensaje ´lleno mensaje
.To = "Aquien(es) se les envia el mensaje"
.Subject = "Asunto del mensaje"
.Body = "Cuerpo del mensaje
.Attachments.Add "poner ruta y archivo
a adjuntar
.Importance = olImportanceHigh
.Send
End With
Set Mensaje = Nothing ´Limpia mensaje
Set Correo = Nothing ´cierra sesión de Correo
´Fin del programa
  Respuesta:  Mª Carmen Fdez.
No se si es esto lo que necesitas saber, pero este código lanza la bandeja de entrada a ver si te gusta:
Dim ret As Long
ret = Shell("start " & "C:\WINDOWS\EXPLORER.EXE /root,C:\WINDOWS\net.msg")
si no te gusta cambia la ruta por esta otra y se te ejecutara el mail de Explorer
C:\WINDOWS\Internet Mail.{89292102-4755-11cf-9DC2-00AA006C2B84}")
Suerte.
  Respuesta:  Obelix
Has de utilizar los objetos MAPISession y MAPIMessage, esto implica un problema por la conexión entre VB5 y el sistema de mensajeria de Windows (El Exchange). Para solucionar este problema hay que actualizar dicho sistema de mensajería por una versión que no de conflictos, encontrándose esta en el WEB de microsoft.
Este error ya estaba reportado en su KB.

Un saludo.