I’ve tried using the following 6 methods to get <TO>, <BC>, <CC> and none work including your suggested code. Please help.
Groupwise – 6.5.6 (2/1/2006)
Formativ – Build 2.0.0.12
METHOND 1)
dim msgid
msgid = groupwise.ItemMessageIDFromView
msgbox groupwise.itemgettext(msgid,itfBC)
METHOD 2)
dim RecCounter, RecipientEntry, CCRecHolder, BCRecHolder
dim RecHolder
If msg.Recipients.count > 0 then
for RecCounter = 1 to Msg.Recipients.count
set RecipientEntry = Msg.Recipients.Item(RecCounter)
‘ Recipient type of an address
Select Case RecipientEntry.TargetType
Case 0 RecHolder = RecHolder & RecipientEntry.EmailAddress & “, “
Case 1 CCRecHolder = CCRecHolder & RecipientEntry.EmailAddress & “, “
Case 2 BCRecHolder = BCRecHolder & RecipientEntry.EmailAddress & “, “
End Select
set RecipientEntry = nothing
next
End if
msgbox “RecHolder=” & RecHolder
msgbox “ccRecHolder=” & CCRecHolder
msgbox “bcRecHolder=” & BCecHolder
METHOD 3)
set msg = GroupWise.ComposingItem
msgbox msg.to_ ‘DOES NOT WORK
msgbox msg.subject’WORKS
METHOD 4)
call groupwise.focusset(fcsCC, “”)
msgbox “char=” & groupwise.envtextcurrentword
METHOD 5)
iMsgID = groupwise.ItemMessageIDFromView
‘ TO
msgbox groupwise.ItemGetText(iMsgID, 0)
METHOD 6) does NOT work for active (DRAFT) object
Set oMsg = Client.ClientState.CommandMessage
for x = 1 to oMsg.Recipients.Count
set oRecipient = oMsg.Recipients.Item(x)
msgbox oRecipient.EmailAddress & vbcrlf & oRecipient.TargetType
set oRecipient = nothing
next
set oMsg = nothing