Enviando um email pelo Outlook

Enviando um e-mail pelo Outlook via Visual Basic

Dicas de Visual Basic
Dicas de 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

Posts Similares