Use Word to Search for Files

答案：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 

上一个：Add a Formatted Table to a Word Document
下一个：一个漂亮的下拉列表，去掉了灰色倒三角按钮