VBA outLook
摘要:
Sub test()Dim ol As New Outlook.ApplicationDim ns As Outlook.NameSpaceDim newMail As Outlook.MailItemSet ns = ol.GetNamespace("MAPI")Set newMail = ol.CreateItem(olMailItem)Set newMail = ol.CreateItemFromTemplate("C:\Users\Administrator\AppData\Roaming\Microsoft\Templates\TEST.oft" 阅读全文
posted @ 2013-09-13 23:35 鱼东鱼 阅读(445) 评论(0) 推荐(0) 编辑