That did it. Thanks Sergey.

>Try
>

>loWSH = CreateObject( "WScript.Shell" )
>loEmailitem.Display()
>loWSH.AppActivate( loEmailItem.Application.ActiveInspector.Caption )
>

>
>I have the following code
>>
>>

>>#DEFINE olFolderInbox 6
>>#DEFINE olFolderOutbox 4
>>#DEFINE olMailItem 0
>>#DEFINE olRecipient 4
>>#DEFINE olRecipients 17
>>#DEFINE IMPORTANCENORMAL 1
>>loApp=CreateObject("Outlook.Application")
>>loNamespace = loApp.GetNamespace("MAPI")
>>loFolder = loNamespace.GetDefaultFolder(olFolderInbox)
>>loEMailItem = loFolder.Items.Add(olMailItem)
>>loEmailItem.Subject = "Test VFP - Outlook"
>>loEmailItem.Recipients.Add('emailadress@someplace.com') && uses the Recipients collection
>>loEmailItem.Importance = IMPORTANCENORMAL
>>loEmailItem.HTMLBody = "Body"
>>loemailitem.Display()
>>*loEmailItem.Send
>>*loApp.Quit()
>>release loApp, loEmailItem
>>

>>
>>Display doesn't really show Outlook. It justs highlight Outlook in my Vista Application toolbar. Outlook doesn't become the active app. I have to click on it in the toolbar to really see it. Any way to really make it the active app. and see the e-mail I just created?