I don’t think any Token API available to return recipients count. You can use Object API Recipients.Count for received or saved draft message.

To get recipients count for draft message, you may need to get recipients list and count items. For example, code below return total recipients in TO field. You need to do the same for CC field.

  
  dim iToRecipients
  iToRecipients = groupwise.ItemGetText("X00", 0)

  if (len(iToRecipients) > 0) then
     recipientsArray = Split(iToRecipients, ";", -1, 1)
     msgbox ubound(recipientsArray) + 1
  end if

Hope this helps.

Regards,
Advansys Support