将文件夹移至指定的目标文件夹中。
expression.MoveTo(DestinationFolder)
expression 必选。该表达式返回 MAPIFolder 对象。
DestinationFolder 必选。返回 MAPIFolder 对象的表达式。要将文件夹移动到的目标文件夹。
本 Visual Basic for Applications 示例将新文件夹添加到默认的“联系人”文件夹中,然后使用 MoveTo 方法将其移至默认的“收件箱”文件夹中。
Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts)
Set myNewFolder = myFolder.Folders.Add("My Contacts")
myNewFolder.MoveTo myNameSpace.GetDefaultFolder(olFolderInbox)
如果使用 VBScript,则不创建 Application 对象,而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。
Set myNameSpace = Application.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(10)
Set myNewFolder = myFolder.Folders.Add("My Contacts")
myNewFolder.MoveTo myNameSpace.GetDefaultFolder(6)