UseWordtoSearchforFiles_javascript技巧

来源：21游戏网

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