Support 1


The address book entry name must be resolved to an email address. See the following code sample for a guide on how to do this.

  dim iRecipient

  iRecipient = GroupWise.ItemGetText("X00", itfTo)

  ' @ symbol is missing, we need to resolve the address
  if (InStr(1, iRecipient, "@", vbTextCompare) = 0) then

    ' Get the full email address of a name or resource.

    iRecipient = GroupWise.AddressBookResolveFullName(iRecipient, "")

    ' Make sure recipient is an external user, check domain name
    if (InStr(1, iRecipient, "novell.com", vbTextCompare) = 0) then
      MsgBox "External Recipient"
    end if
  end if

I hope this helps you.

Advansys Support