下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. JV_VF'
NN>E1d=
KTLq~Ru
Dim strMsg As String 8G3CQ]G
Dim myFwdMail As Outlook.MailItem v3\
|
Dim myFwdMeet As Outlook.MeetingItem K!~j}z*
E&>3 {uZI
Set myFwdMail = itemMail.Forward 0#Ivo<V
0APh=Alq
myFwdMail.Recipients.Add "xxx@xxx.com" LL% Aw)Q`
myFwdMail.Send <KY \sb9
Set myFwdMail = Nothing ["O/%6b9+
End Sub |y%pJdPk=