下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. q<Y#-Io%3
UZ
!It>
DDe`Lb%%
Dim strMsg As String y>
0Gmr
Dim myFwdMail As Outlook.MailItem ^1bM=9]F0
Dim myFwdMeet As Outlook.MeetingItem 7`tJ/xtMy;
|eK^Yhym
Set myFwdMail = itemMail.Forward O@a7MzJ
U% OlYP$g
myFwdMail.Recipients.Add "xxx@xxx.com" @PV3G
KJ
myFwdMail.Send -'T^gEd)c
Set myFwdMail = Nothing { a_&L
End Sub H^+Znmo