全部显示

CreateItem 方法

创建并返回新的 Microsoft Outlook 项目。CreateItem 方法仅可创建默认的 Outlook 项目。要创建使用自定义窗体的新项目，可使用 Items 集合中的 Add 方法。

expression   必选。该表达式返回 Application 对象。

ItemType  必选的 OlItemType 常量。新项目的 Outlook 项目 Type。

示例

本 Visual Basic for Applications 示例使用 CreateItem 方法在默认的“联系人”文件夹中创建新联系人，并显示该新项目。

Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts)
Set myItem = myOlApp.CreateItem(olContactItem)
myItem.Display

如果使用 VBScript，则不创建 Application 对象，而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。

Set myNameSpace = Application.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(10)
Set myItem = Application.CreateItem(2)
myItem.Display