>> The code is all being run from Access (the bit of code I had the client
>> run from Outlook was just to troubleshoot from Outlook to see what kind
>> of error we were getting). This is all being run from Outlook using early
>> binding.
>>
>> Thanks for explaining about why MailItem worked from Access without a
>> reference to the Outlook object.
>>
>> Now for the $64,000 question:
>>
>> why is it, when I do:
>>
>> Dim objOutlookMsg As MailItem
>> Set objOutlookMsg = CreateItem(olMailItem)
>> With objOutlookMsg
>> .To = "as@kfksl.com"
>> .Subject = "sdljs lksj flkj"
>> .Display
>> .GetInspector.CommandBars.ExecuteMso ("Paste")
>> End With
>>
>> the code works fine, time after time; but when I do:
>>
>> Dim objOutlook As Outlook.Application
>> Dim objOutlookMsg As Outlook.MailItem
>> Set objOutlook = GetObject(, "Outlook.Application")
>> Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
>> With objOutlookMsg
>> .To = "as@kfksl.com"
>> .Subject = "sdljs lksj flkj"
>> .Display
>> .GetInspector.CommandBars.ExecuteMso ("Paste")
>> End With
>>
>> it works fine the first time it's run, but then gives "automation error"
>> on the "Paste" line the 2nd and subsequent times it's run? (And when the
>> automation error occurs, it is resolved by looping back to the "Paste"
>> line after a 1 second delay and trying again.)
>>
>> I don't know if there's an answer to that. But it's the same code --
>> except one makes an explicit reference to the Outlook object, and the
>> other doesn't. Very bizarre.
>>
>> Thanks!
>>
>> Neil