Wayne,
It does open GroupWise, but doesn't bring you to the message...
Thanks for the tip.
UPDATE. I looked into several old threads on the topic (looks like I had the same problem in 2001) and I may try with Nigel's class again instead.
>Here's how a colleague of mine finally did it...
>
>
>WSHShell = CreateObject("WScript.Shell")
>lcgwpath = WSHShell.RegRead("HKEY_CURRENT_USER\Software\Novell\GroupWise\Client\Files Locations\views")
>IF File(lcgwpath+"GRPWISE.EXE")
> lccommand = "!/n" + justpath(alltrim(lcgwpath)) + "\GRPWISE.EXE"
> &lccommand
>ENDIF
>
>
>Because Groupwise will only open once, it doesn't matter if you have it running or not, it brings it to the foreground. He adds the message as a draft.
>
>
>>Hi All,
>>
>>Does anyone happen to know what I need to fire to display
>>the Groupwise E-Mail Client Window before sending an e-mail??
>>I cannot find this info anywhere I have looked... Heres my
>>simple little code sample:
>>
>>SET CLASSLIB TO clsGroupwise
>>oGroupWise = CREATEOBJECT("NovellGroupwareSession")
>>oAccount = oGroupWise.Login
>>oWorkfolder = oAccount.WorkFolder
>>oMessages = oWorkfolder.MESSAGES
>>oMessage = oMessages.ADD
>>oMessage.FromText = ALLTRIM('Me')
>>oMessage.Subject = ALLTRIM('Test')
>>oMessage.BodyText = ALLTRIM('test')
>>oRecipients = oMessage.Recipients
>>oRecipients.ADD('Me Again')
>>
>>So Now, all I want to do is display the e-mail on the screen so the
>>user can hit the [Send] box and send it...
>>
>>Thanx!
>>Bob
If it's not broken, fix it until it is.
My Blog