How to put E-mail message and attachments into Drafts folder?
Posted on 2002-04-08
I have the code:
Dim a As Outlook.Application
Dim b As Outlook.MailItem
Set a = New Outlook.Application
Set b = a.CreateItem(olMailItem)
.To = mstrEMail
.Subject = "Commission Report"
' .BCC = "email@example.com" '
.Attachments.Add oFolder.Path & "\" & oFile.Name
.Body = "Attached is your Commission Report."
I don't want to send. I want to put everything into the Drafts folder first. How can I do it?