首页 > 开发 > JS > 正文

Use Word to Search for Files

2024-09-06 12:42:08
字体:
来源:转载
供稿:网友
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


发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表