Enviando um e-mail pelo Outlook via Visual Basic
Primeiro, selecione o componente MICROSOFT MAPI CONTROLS.
Depois acrecente no seu form o objeto MAPISESSION e MAPIMESSAGES que apareceram na sua toolbox. Então use a seguinte codificação para enviar uma mensagem:
mapisession.Action = 1
mapimessages1.SessionID = mapisession.SessionID
mapimessages1.Compose
mapimessages1.RecipAddress = “[email protected]”
mapimessages1.AddressResolveUI = True
mapimessages1.ResolveName
mapimessages1.MsgSubject = “Titulo da minha mensagem”
mapimessages1.MsgNoteText = “Conheça o site Web Mundi, blablablabla…”
mapimessages1.Send False