下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. [73 \jT
ejr9e@D^
B8XW+U
Dim strMsg As String ll]MBq
Dim myFwdMail As Outlook.MailItem RK7vR~kf<
Dim myFwdMeet As Outlook.MeetingItem v|\<N!g
~&zrDj~FI
Set myFwdMail = itemMail.Forward " Bz\<e&u
C*+gQeK
myFwdMail.Recipients.Add "xxx@xxx.com" |rjHH<
myFwdMail.Send &E
{CQ#k
Set myFwdMail = Nothing Iq76JJuCb
End Sub nFRU-D$7