Download e-mail attachments
This code enables you to download and send e-mail, which will automatically put yourattachments into a given directory. Original Author: Gemma Dobbins Inputs Mapisession control, mapimessages control, 2 command buttons and 1 text box. Code Private Sub Command1_Click() MAPISession1.DownLoadMail = False MAPISession1.SignOn MAPIMessages1.SessionID = MAPISession1.SessionID MAPIMessages1.MsgIndex = -1 MAPIMessages1.Compose MAPIMessages1.Send True MAPISession1.SignOffEnd SubPrivate Sub Command2_Click() MAPISession1.DownLoadMail = True MAPISession1.SignOn MAPIMessages1.FetchUnreadOnly = True MAPIMessages1.SessionID = MAPISession1.SessionID MAPIMessages1.Fetch On Error Resume Next MAPIMessages1.AttachmentPathName = MAPIMessages1.AttachmentPathName… Read More »