outlook2007 邮件地址有关问题

outlook2007 邮件地址问题
目标： 
  在outlook2007中，发送邮件前，增加抄送人 

实现： 
  Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)事件中写如下代码： 
  Set myRcpt = Application.ActiveInspector.CurrentItem.Recipients.Add("jjjjjj@gmail.com") 
  myRcpt.Type = olCC 

结果和问题： 
  邮件成功发给收件人，但新增的这个抄送地址发送失败，原因是cc列表中显示为"'jjjjjj@gmail.com'"，而不是jjjjjj@gmail.com，导致outlook不认识这个地址。各位有经验的哥，该如何解决？

[解决办法]
我的加了这段代码，显示不了cc
[解决办法]
试试

VB code

.Recipients.Add("jjjjjj@gmail.com <jjjjjj@gmail.com>")
[解决办法]
再或者根据地址簿自动取得名称
VB code
Set myRcpt = Application.ActiveInspector.CurrentItem.Recipients.Add("jjjjjj@gmail.com") myRcpt.Type = olCCmyRcpt.Resolve