怎么发送邮件副本

如何发送邮件副本
我是用maillmess控件的方式啊，部分代码如下的，关键是怎样用这种方式来发送邮件副本啊。。我搜索了下，就是知道要用到   recitype=2这个属性，但具体的方法是怎样呢？有请各位给个例子。。谢谢。。
thisform.OleMsess.signon                                                                         &&打开电子邮件句柄
thisform.olemmess.sessionid   =   thisform.olemsess.sessionid       &&将句柄传给邮件编辑程序
thisform.olemmess.compose                                                                       &&构成一个消息
thisform.olemmess.msgnotetext   =   <要发送的内容>
thisform.olemmess.msgsubject   =   <邮件标题>
thisform.olemmess.MsgIndex   =   -1
thisform.olemmess.RecipAddress   =   <Email>
thisform.olemmess.send()                                                                         &&发送邮件
thisform.olemsess.signoff                                                                       &&关闭电子邮件句柄

------解决方案--------------------
请参考：

http://www.vfptop.com/bcxjylist.asp?id=55