如何发送邮件副本
我是用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