vbscript 文件夹中的VBS查找文件。 (执行:cscript lookupXML.vbs)

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了vbscript 文件夹中的VBS查找文件。 (执行:cscript lookupXML.vbs)相关的知识,希望对你有一定的参考价值。

On Error Resume Next

Dim fso, StdOut, folders, files, ext

folders = Array(_
"c:\",_
"c:\users"_
)


ext = ".xml"

  Set fso = CreateObject("Scripting.FileSystemObject")
  Set StdOut = fso.GetStandardStream (1)
  
  StdOut.WriteLine ""
  StdOut.WriteLine ""
  StdOut.WriteLine "** Testing for XMLs:"
  StdOut.WriteLine ""
  StdOut.WriteLine ""

For each sFolder In folders
  
  Set files = fso.GetFolder(sFolder).Files

  For each folderIdx In files

    If InStr(folderIdx.name, ".xml") > 0 Then
      StdOut.WriteLine "    > " + ext + " found in " + sFolder
    End If

  Next
Next

StdOut.WriteLine ""
StdOut.WriteLine ""
StdOut.WriteLine "** Tested all Dirs."
Wscript.Quit

以上是关于vbscript 文件夹中的VBS查找文件。 (执行:cscript lookupXML.vbs)的主要内容,如果未能解决你的问题,请参考以下文章

vbscript 存档文件的VBS脚本

我可以将参数传递给 VBScript(使用 cscript 启动的 vbs 文件)吗?

如何在vbs中设置可以在调用批处理脚本中读取的环境变量

使用VBScript控制Microsoft单词选项

执行vbscript(?)代码:自动打开目录中的新文件[关闭]

怎么在游戏中使用vbs脚本