AddStore 方法

       

将个人文件夹 (.pst) 文件添加到当前配置文件中。

expression.AddStore(Store)

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

Store  Variant 类型,必选。要添加到配置文件中的 .pst 文件的路径。如果 .pst 文件不存在,Microsoft Outlook 将创建它。

示例

本 Microsoft Visual Basic/Visual Basic for Applications 示例将新个人文件夹 (.pst) 文件添加到用户配置文件中。

Dim myOlApp As New Outlook.Application
Dim myNS As Outlook.NameSpace
Set myNS = myOlApp.GetNamespace("MAPI")
myNS.AddStore "c:\" & myNS.CurrentUser & ".pst"

如果使用 VBScript,则不必创建 Application 对象。本示例说明如何使用 VBScript 执行相同任务。

Set myNS = Application.GetNamespace("MAPI")
myNS.AddStore "c:\" & myNS.CurrentUser & ".pst"