返回或设置 String 类型的值,该值代表与 DocumentLibrary 对象相关联的网页的相对 URL。可读写。
expression.FileDialogViewPage
expression 必选。返回 DocumentLibrary 对象的表达式。
下列示例创建名为 NewLibrary 的新文档库,并显示“文件”对话网页的相对 URL。
Sub NewLibrary()
'Add a new list to the current web
Dim objApp As FrontPage.Application
Dim objLists As Lists
Dim objLibrary As DocumentLibrary
Set objApp = FrontPage.Application
Set objLists = objApp.ActiveWeb.Lists
'Add new list
objLists.Add Name:="NewLibrary", _
ListType:=fpListTypeDocumentLibrary, _
Description:="List of Shared files"
Set objLibrary = objLists.Item("NewLibrary")
'Display message to user
MsgBox "A new list was added to the Lists collection." & _
"The page associated with the file dialog is " & _
objLibrary.FileDialogViewPage & "."
End Sub