none
Windows VistaでのFileSearch.LookInのドライブ指定

    質問

  • お世話になります。
    VisualBasic6.0とExcel2003で開発しています。

    下記コード実行時、WindowsXP(SP2)では、イミディエイトウィンドウに検索結果が表示されます。
    WindowsVistaでは、検索処理が終了しません。
    ※ Cドライブ直下に検索対象ファイルを配置し、[myFs.Filename = "検索対象ファイル名"]を
       指定しましたが、結果は同様でした。
       検索場所を[C:\a]にした場合は正常に動作しました。

    WindowsVistaでは、検索場所にドライブを指定することができないのでしょうか。
    任意のディレクトリに配置されたファイルから、Cドライブ以下の["検索対象ファイル"]を
    検索したいと考えています。

    方法等、ご存知でしたらよろしくお願い致します。

    ====================================================================================
    【実行コード】
    Sub test()
        Dim myFs   As FileSearch
        Dim myPath As String
        Dim i      As Long
       
        Set myFs = Application.FileSearch
        myPath = "C:\"
        With myFs
            .NewSearch
            .LookIn = myPath
            .FileType = msoFileTypeAllFiles
            .Filename = "*.txt"
            .SearchSubFolders = True
            If .Execute(SortBy:=msoSortByFileName) > 0 Then
                For i = 1 To .FoundFiles.Count
                    Debug.Print .FoundFiles(i)
                Next
            Else
                Debug.Print "指定ファイルは見つかりませんでした。"
            End If
        End With
        Set myFs = Nothing
    End Sub
    ====================================================================================

    よろしくお願い致します。

    2007年1月10日 5:22