Ik heb de volgende code voor het doorsturen van een mail als bijlage:
Dim mOutLookApp As Outlook.Application
Dim mNameSpace As Outlook.NameSpace
Dim mItem As Outlook.MailItem
Set mOutLookApp = New Outlook.Application
Set mNameSpace = mOutLookApp.GetNamespace("MAPI")
mNameSpace.Logon , , False, True
Set mItem = mOutLookApp.CreateItem(olMailItem)
mItem.To = "Mailadres"
mItem.Attachments.Add (Outlook.mailitem object)
mItem.Send
Bij het uitvoeren van dit script krijg ik de melding dat de bestandslocatie van de attachment niet klopt. Ik wil echter niet dat er een bestand als attachment gestuurd wordt, maar een eerder MailItem.
Kortom ik wil een mail doorsturen als bijlage. Is hier een oplossing voor?
Dim mOutLookApp As Outlook.Application
Dim mNameSpace As Outlook.NameSpace
Dim mItem As Outlook.MailItem
Set mOutLookApp = New Outlook.Application
Set mNameSpace = mOutLookApp.GetNamespace("MAPI")
mNameSpace.Logon , , False, True
Set mItem = mOutLookApp.CreateItem(olMailItem)
mItem.To = "Mailadres"
mItem.Attachments.Add (Outlook.mailitem object)
mItem.Send
Bij het uitvoeren van dit script krijg ik de melding dat de bestandslocatie van de attachment niet klopt. Ik wil echter niet dat er een bestand als attachment gestuurd wordt, maar een eerder MailItem.
Kortom ik wil een mail doorsturen als bijlage. Is hier een oplossing voor?