ポップアップメニューでファイル選択

概要

ポップアップメニューでファイルを選択することができます。

詳細はポップアップメニューでファイル選択.jsについてを参照してください。

ソースコード

#title = "ポップアップメニューでファイル選択"
// MyFileSelector.js
// ネットワーク環境での動作確認はしていません。

// ショートカットは＞、フォルダとドライブは└ が頭につきます。
// 関数objNameで指定しています。

MyFolderObj = function() {
	this.initialize.apply(this, arguments);
};
MyFolderObj.prototype = {
	files: "ファイルとサブフォルダのオブジェクトの配列",
	isrootfolder: "ルートフォルダのときture",
	parentfolder: "親フォルダのpath",
	initialize: function(foldername) {
		var objFso = new ActiveXObject("Scripting.FileSystemObject");
		if (foldername == undefined || foldername.length == 0 || !objFso.FolderExists(foldername)) {
			var f = objFso.GetFolder(".");
		} else {
			var f = objFso.GetFolder(foldername);
		}
		this.isrootfolder = f.IsRootFolder;
		if (f.IsRootFolder) {
			this.parentfolder = f.path;
//			this.parentfolder = null;
		} else {
			this.parentfolder = f.parentfolder.path;
		}
		var files = [];

		// ファイル → サブフォルダ の順で表示。
		var fc = new Enumerator(f.files);
		for (; !fc.atEnd(); fc.moveNext()) {
			files.push(fc.item());
		}
		var sfc = new Enumerator(f.SubFolders);
		for (; !sfc.atEnd(); sfc.moveNext()) {
			files.push(sfc.item());
		}

		this.files = files;
		objFso = null;
	}
};

MyFileSelector = function() {
	this.initialize.apply(this, arguments);
};
MyFileSelector.prototype = {
	myfolder: "MyFolderObj",
	lists: "表示するオブジェクトの配列",
	index: "表示の起点",
	selected: "選択されたファイル",
	offset: "popupMenuのオフセット（固定メニュー数上限）",
	menusize: "ポップアップメニューのファイル等の表示件数",
	initialize: function(foldername, menusize) {
		this.myfolder = new MyFolderObj(foldername);
		this.lists = this.myfolder.files.slice();
		this.index = 0;
		this.selected = "";
		this.offset = 9;
		this.menusize = (arguments.length < 2 || menusize < 1) ? 20 : menusize;
	},
	selectFile: function() {
		var menu = CreatePopupMenu();
		menu.Add("上のフォルダー", 1, ((isDrive(this.lists[0])) ? meMenuGrayed : 0));
		menu.Add("次ページ", 2, ((this.index + menusize > this.lists.length) ? meMenuGrayed : 0));
		menu.Add("前ページ", 3, ((this.index > 0) ? 0 : meMenuGrayed));
		menu.Add("最後へ", 4, ((this.index + menusize > this.lists.length) ? meMenuGrayed : 0));
		menu.Add("-------", 0, meMenuSeparator);
		for (var i = this.index; i < this.index + this.menusize; i++) {
			if (i < this.lists.length) {
				menu.Add(objName(this.lists[i]), i + this.offset, 0);
			} else {
				if (this.index > 0) {
					menu.Add("（ 先頭へ ）", 5, 0);
				}
				break;
			}
		}
		var r = (menu.Track(0) - this.offset);

		switch (r) {
			case 0 - this.offset: // 選択せず
				Quit();
			case 1 - this.offset: // 上のフォルダー
				this.index = 0;
				if (this.myfolder.isrootfolder) {
					this.lists = getDriveList().slice();
				} else {
					this.myfolder = new MyFolderObj(this.myfolder.parentfolder);
					this.lists = this.myfolder.files.slice();
				}
				break;
			case 2 - this.offset: // 次頁
				var x = this.index + this.menusize;
				this.index = (x < this.lists.length) ? x : this.index;
				break;

			case 3 - this.offset: // 前頁
				var x = this.index - this.menusize;
				this.index = (x < 0) ? 0 : x;
				break;
			case 4 - this.offset: // 最後の頁
				this.index = (this.lists.length == 0) ? 0 : Math.floor((this.lists.length - 1) / this.menusize) * this.menusize;
				break;
			case 5 - this.offset: // 先頭へ
				this.index = 0;
				break;
			default:
				var item = (isLnk(this.lists[r])) ? lnk2entity(this.lists[r]) : this.lists[r];
				if (isFile(item)) { // ファイル
					this.selected = item;
				} else if (isFolder(item) || isDrive(item)) { // フォルダ、ドライブ
					this.index = 0;
					this.myfolder = new MyFolderObj(item.Path);
					this.lists = this.myfolder.files.slice();
				}
		}
		return this.selected;

		function lnk2entity(obj) {
			// ショートカットの指すファイル（またはフォルダ）オブジェクトを返す。
			var WshShell = new ActiveXObject("WScript.Shell");
			var selectedPath = WshShell.CreateShortcut(obj.Path).TargetPath;
			var result = null;
			var objFso = new ActiveXObject("Scripting.FileSystemObject");
			if (objFso.FileExists(selectedPath)) {
				result = objFso.GetFile(selectedPath);
			} else if (objFso.FolderExists(selectedPath)) {
				result = objFso.GetFolder(selectedPath);
			}
			WshShell = null;
			selectedPath = null;
			objFso = null;
			return result;
		}
		function getDriveList() {
			// 有効なDriveオブジェクトのルートフォルダをフォルダオブジェクトの配列で返す。
			var fso, n, e, x;
			var dary = [];
			var objFso = new ActiveXObject("Scripting.FileSystemObject");
			e = new Enumerator(objFso.Drives);
			for (; !e.atEnd(); e.moveNext()) {
				x = e.item();
				if (x.IsReady) {
					dary.push(x.RootFolder);
				}
			}
			objFso = null;
			return dary;
		}
		function objName(obj) {
			// ポップアップメニュー用に各オブジェクトの名前等を返す。
			if (isLnk(obj)) {            // ショートカット
				return "＞ " + obj.Name;
			} else if (isFile(obj)) {    // ファイル
				return obj.Name;
			} else if (isFolder(obj)) {  // フォルダー, ディスク
				var str = (obj.Name == "") ? obj.Path : obj.Name;
				return "└ " + str;
			} else {
				return "objName？";
			}
		}
		function isLnk(obj) {
			return obj.type == "ショートカット";
		}
		function isFile(obj) {
			var objFso = new ActiveXObject("Scripting.FileSystemObject");
			var result = objFso.FileExists(obj.path);
			objFso = null;
			return result;
		}
		function isFolder(obj) {
			var objFso = new ActiveXObject("Scripting.FileSystemObject");
			var result = objFso.FolderExists(obj.path);
			objFso = null;
			return result;
		}
		function isDrive(obj) {
			if (obj == undefined) {
				return false;
			}
			var objFso = new ActiveXObject("Scripting.FileSystemObject");
			var result = objFso.DriveExists(obj.path);
			objFso = null;
			return result;
		}
	}
};


// ----------
path = document.path;
menusize = 25;
// 引数ナシでも動作します。
var myfileselector = new MyFileSelector(path, menusize);
var selected = "";
while (selected == "") {
	selected = myfileselector.selectFile();
}

editor.OpenFile(selected.Path, meEncodingNone, meOpenAllowNewWindow);