WSH/ランダム再生のバックアップ(No.2)

バックアップ一覧
差分を表示
現在との差分を表示
ソースを表示
WSH/ランダム再生へ行く。
- 1 (2009-11-05 (木) 23:44:12)
- 2 (2012-01-15 (日) 20:06:16)

　動画1ファイルを無作為に再生したい場合に。

//
// ランダム再生
//
// @author Jomora(kazuhiko@jomura.net)
// @version 2009.11.05 初版作成

//再生ファイルを再帰検索する親フォルダ
var targetFolder = "E:/video";
//再生用アプリケーション
var playerPath = "\"C:/Program Files (x86)/GRETECH/GomPlayer/GOM.exe\"";

//**Start Encode**

if (WScript.Arguments.length != 0) {
	targetFolder = WScript.Arguments(0);
}

//main
var fso = WScript.CreateObject("Scripting.FileSystemObject");
var rootFolderObj = fso.GetFolder(targetFolder);
var arr = new Array();
GetFileList(rootFolderObj, arr);
var filepath = RandomSelect(arr);
Play(filepath);

WScript.Quit(0);

//functions

function GetFileList(folderObj, arr) {
	var i = new Enumerator(folderObj.Files);
	for (; !i.atEnd(); i.moveNext()) {
		arr.push(i.item().Path);
	}
	var j = new Enumerator(folderObj.SubFolders);
	for (; !j.atEnd(); j.moveNext()) {
		GetFileList(j.item(), arr);
	}
}

function RandomSelect(arr) {
	var index = Math.floor(Math.random() * (arr.length));
	return arr[index];
}

function Play(filepath) {
	var shell = WScript.CreateObject("WScript.Shell");
	shell.Run(playerPath + " \"" + filepath + "\"");
}

WSH/ランダム再生 のバックアップ(No.2)

WSH/ランダム再生のバックアップ(No.2)