[wsh]特定のフォルダを除外しながら再帰的にフォルダを列挙する

enumfiles.wsf

<?xml version="1.0" ?>
<!-- 特定のフォルダを除外してフォルダを列挙する -->
<package>
  <job id="EnumFolders">
    <object id="fso" progid="Scripting.FileSystemObject"/>
    <script language="JScript"><![CDATA[
      // 除外するパターン
      var excludes = new ActiveXObject("VBScript.RegExp");
      excludes.Pattern = "^.svn$|^Branches";

      var folder = fso.GetFolder("d:\\Projects\\HogeHoge");
      enumSubFolders(folder);

      function enumSubFolders(folder) {
        var subFolders = new Enumerator(folder.SubFolders);
        for (; !subFolders.atEnd(); subFolders.moveNext()) {
          var subFolder = subFolders.item();
          if (excludes.Test(subFolder.Name)) {
            continue;
          }
          WScript.Echo(subFolder.Path);
          // sub folders
          enumSubFolders(subFolder);
        }
      }
    ]]></script>
  </job>
</package>