下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. \xa36~hh40
qP%Smfp6
9;m#>a@Y
Dim strMsg As String WzNG<rG
Dim myFwdMail As Outlook.MailItem q[Sp|C6x
Dim myFwdMeet As Outlook.MeetingItem FE^?U%:u@
hO:)=}+H
Set myFwdMail = itemMail.Forward u|:UFz^p
?];~N5<'
myFwdMail.Recipients.Add "xxx@xxx.com" kM6
EZ`mj
myFwdMail.Send #!K~_DL
Set myFwdMail = Nothing Q_UCF'f;}
End Sub f@,hO5h(_|