返回当前文件夹的路径。String 类型,只读。
expression.FolderPath
expression 必选。该表达式返回 MAPIFolder 对象。
以下示例显示有关当前文件夹的信息。子例程接受一个 MAPIFolder 对象,并显示当前文件夹的名称、路径和通讯簿信息。
Sub Folderpaths()
Dim olApp As Outlook.Application
Dim nmsName As NameSpace
Dim fldFolder As MAPIFolder
Set olApp = Outlook.Application
'Create namespace reference
Set nmsName = olApp.GetNamespace("MAPI")
'create folder instance
Set fldFolder = nmsName.GetDefaultFolder(olFolderInbox)
'call sub program
Call FolderInfo(fldFolder)
End Sub
Sub FolderInfo(ByVal fldFolder As MAPIFolder)
'Displays information about a given folder
MsgBox fldFolder.Name & "'s current path is " & fldFolder.FolderPath & _
". The current address book name is " & fldFolder.AddressBookName & "."
End Sub