MDIE Part16

「クリップボードの文字列からフォルダを作成する」スクリプトをパクって作ってみた。
foo.exe,foo.ini,foo.txtみたいなファイルの1つを選んで実行すると
fooフォルダにまとめます。

/*
* カーソル位置のファイル名で新規フォルダ作成しファイル移動
*
*/
var FSO = new ActiveXObject("Scripting.FileSystemObject");
var base = FSO.GetBaseName(FSO.GetFileName(FolderView.FocusItem.Path));
var path = FSO.BuildPath(FolderView.Path, base);
if (FSO.FolderExists(path) || FSO.FileExists(path)) {
for (var i=1; (FSO.FolderExists(path) || FSO.FileExists(path)); i++) {
path = FSO.BuildPath(FolderView.Path, base + '(' + i + ')');
}
}
FSO.CreateFolder(path);
FSO.MoveFile(FolderView.Path + "\\" + base + ".*", path + "\\");