Use Word to Search for Files

2022-01-13,,

Demonstration script that uses Microsoft Word to locate all the 
.mp3 files stored on drive C of the local computer
复制代码 代码如下:
Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Add()

objWord.FileSearch.FileName = "*.mp3"
objWord.FileSearch.LookIn = "C:\"
objWord.FileSearch.SearchSubfolders = True
objWord.FileSearch.Execute

For Each objFile in objWord.FileSearch.FoundFiles
    Wscript.Echo objFile
Next

objWord.Quit

以上就是Use Word to Search for Files的详细内容,更多请关注本站其它相关文章!

《Use Word to Search for Files.doc》

下载本文的Word格式文档,以方便收藏与打印。