IsHiddenFoldersEnabled 属性

返回或设置 Boolean 类型的值，该值确定隐藏文件是否显示在当前站点中。可读写。

expression  必选。返回 WebEx 对象的表达式。

示例

下列示例提示用户显示当前站点中的隐藏文件夹。IsHiddenFoldersEnabled 属性会根据用户的响应进行设置。

Sub ViewAllFolders()
'Prompts the user to view hidden folders

    Dim objApp As FrontPage.Application
    Dim objWeb As WebEx
    Dim strAns As String

    Set objApp = FrontPage.Application
    Set objWeb = objApp.ActiveWeb
    'prompt user
    strAns = MsgBox("Do you want to view hidden folders?", vbYesNo)
    'Set value of property to match user's response
    If strAns = vbYes Then
        objWeb.IsHiddenFoldersEnabled = True
    Else
        objWeb.IsHiddenFoldersEnabled = False
    End If

End Sub