用 WSH 新增MS Outlook 資料夾

Set objOutlook = CreateObject("Outlook.Application")
Set myNameSpace = objOutlook.GetNamespace("MAPI")
Set myInboxFolder = myNameSpace.GetDefaultFolder(6)
Set myNewFolder = myInboxFolder.Folders.Add("資料夾一")
Set myNewFolder = myInboxFolder.Folders.Add("資料夾二")
Set myNewFolder = myInboxFolder.Folders.Add("資料夾三")

0 意見:

張貼留言