Does anybody know how to make an email message created in Outlook (via OLE automation from VFP) the active window? I have some code like this ...

loOutlook = createobject( 'Outlook.Application' )
loNameSpace = loOutlook.GetNameSpace('MAPI')
loEmail = loOutlook.CreateItem(0)
with loEmail
.Subject = '///whatever'
.Body = '///whatever'
.Attachments.Add( '///whatever' )
.Save()
endwith

... and I would like to make the newly created email message become visible as the active window, so that the user can type a few comments into it and then hit Send when they're done. As it is (above), I have to teach users to switch to Outlook and look in the Drafts folder for the new message, which is inconvenient and error-prone.

TIA, Doug