下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. P7>IZ >bw
o_:Qk;t
Y2vj}9jK
Dim strMsg As String ,|x\MHd?t_
Dim myFwdMail As Outlook.MailItem z+6QZQk
Dim myFwdMeet As Outlook.MeetingItem <[8@5 ?&&
=5_y<0`4
Set myFwdMail = itemMail.Forward j1F w
U
lu3.KOD/
myFwdMail.Recipients.Add "xxx@xxx.com" yam}x*O\xn
myFwdMail.Send _@|fva&s,;
Set myFwdMail = Nothing ruHrv"2
9
End Sub ,9UCb$mh