FileDialogViewPage 属性


返回或设置 String 类型的值,该值代表与 DocumentLibrary 对象相关联的网页的相对 URL。可读写。


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