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
推荐阅读
特想搞点新的创意出来-立体方块
无奈本人的水平有限
.origin { background-color:#000000; color:#ffffff;font-family:华文行楷;font-size:10pt;writing-mode:tb-rl; }
.over { background-color:#ffffff; color:#000000;font-family:隶>>>详细阅读
本文标题:Use Word to Search for Files
地址:http://www.17bianji.com/kaifa2/JS/30334.html
1/2 1