- 217 名前：197 mailto:sage [2008/08/04(月) 23:20:45 ]
- >>212
リネームすることでコレクション内のポインタ（moveNext() で動くやつ）の位置に
（恐らく）不整合が出るだけであって、ファイル数自体が増えるわけではないよ。
「(元のファイル名) -> (リネーム後のファイル名) (コレクションの要素数)」という
フォーマットで結果を吐き出すスクリプト。（当方環境：Me/WSH5.6）
var targetDir = "C:\\TEST"; // '1.TXT'、'2.TXT' の2枚のファイルが入っている。
var objFSO = WScript.CreateObject("Scripting.FileSystemObject");
var fo = objFSO.GetFolder(targetDir);
var fc = fo.Files;
var fe = new Enumerator(fc);
var filename = "";
var arr = new Array();
for (; !fe.atEnd(); fe.moveNext()) {
filename = fe.item().Name;
fe.item().Name = "_" + fe.item().Name; ... (a)
//fe.item().Name = "~" + fe.item().Name; ... (b)
arr.push(filename + " -> " + fe.item().Name + " (" + fc.Count + ")");
}
WScript.Echo(arr.join("\n"));
（「改行が多い」と怒られたので結果は次）
|
 |
