Office VBA教程:SearchScope对象

   
SearchScopes
SearchScope
ScopeFolder

对应于可使用 FileSearch对象搜索的文件夹树的类型。例如,该计算机上的本地驱动器表示一个搜索范围。网络文件夹和 Microsoft Outlook 文件夹也可能是可用的独立搜索范围。每个 SearchScope对象包含一个 ScopeFolder对象,对应于搜索范围的根文件夹。

使用 SearchScope对象

使用 SearchScopes集合的 Item方法返回 SearchScope对象,例如:


Dim ss As SearchScope
Set ss = Application.FileSearch.SearchScopes.Item(1)

最终,SearchScope对象要提供对可添加到 SearchFolders集合的 ScopeFolder对象的访问。有关演示如何实现的示例,请参阅SearchFolders集合的主题。

请参阅ScopeFolder对象的主题查阅如何从 SearchScope对象返回 ScopeFolder对象的简单示例。

本示例显示所有当前可用的 SearchScope对象。


Sub DisplayAvailableScopes()
    'Declare a variable that references a
    'SearchScope object.
    Dim ss As SearchScope
    'Use a With...End With block to reference the
    'FileSearch object.
    With Application.FileSearch
        'Loop through the SearchScopes collection.
        For Each ss In .SearchScopes
            Select Case ss.Type
                Case msoSearchInMyComputer
                    MsgBox "My Computer is an available search scope."
                Case msoSearchInMyNetworkPlaces
                    MsgBox "My Network Places is an available search scope."
                Case msoSearchInOutlook
                    MsgBox "Outlook is an available search scope."
                Case msoSearchInCustom
                    MsgBox "A custom search scope is available."
                Case Else
                    MsgBox "Can't determine search scope."
            End Select
        Next ss
    End With
End Sub

上页:Office VBA教程:SearchFolders集合 下页:Office VBA教程:SearchScopes集合

Office VBA教程:SearchScope对象

Office VBA教程:SearchScopes集合 Office VBA教程:Signature对象
Office VBA教程:SignatureSet集合 Office VBA教程:WebPageFont对象
Office VBA教程:WebPageFonts集合对象 Office VBA教程:New对象
Office VBA教程:ActionControl属性 Office VBA教程:ActiveMenuBar属性
Office VBA教程:AdaptiveMenu属性 Office VBA教程:AdaptiveMenus属性
Office VBA教程:AllowMultiSelect属性 Office VBA教程:Animation属性
Office VBA教程:Application属性 Office VBA教程:AssistWithAlerts属性
Office VBA教程:AssistWithHelp属性 Office VBA教程:AssistWithWizards属性
Office VBA教程:AttachCertificate属性 Office VBA教程:BalloonError属性
Office VBA教程:BalloonType属性 Office VBA教程:BeginGroup属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号