2006-09Sep-27

Opening an e-mail window with GroupWise™

In most cases, you can open an e-mail editing window using

DECLARE INTEGER ShellExecute IN SHELL32.DLL ;
  INTEGER nWinHandle,;
  STRING cOperation,;
  STRING cFileName,;
  STRING cParameters,;
  STRING cDirectory,;
  INTEGER nShowWindow
ShellExecute(0,"open","mailto://"+m.tcMail,"",NULL,1)

Sometimes (or maybe always) GroupWise™ doesn't respond to the "mailto:" syntax despite being the default email client. Fortunately, GroupWise™ supports something that I'd call DDE over COM. You create a COM object that lets you send commands in the same fashion as DDEPOKE() does in VFP with DDE:

LOCAL loGroupwise, lcResult
lcResult = ""
loGroupwise = CREATEOBJECT("GroupWiseCommander")
loGroupwise.Execute("NewMail()",@lcResult)
loGroupwise.Execute( ;
  [TextSetTo("]+m.lcText+[")], ;
  @lcResult ;
)

A list of commands (called GroupWise Tokens) can be found on the Novell website.