dara-j

方針

すなおに.wsfにすればあまり苦労はないんだけど、XML中にスクリプトを書くのはなんとなく収まりが悪いので、.jsファイルのみの方向で。

基本的な考え方

とはいってもJScript自体にも、WScriptにもファイルをインクルードする機構はないから、eval()するしかない。

しかし、ライブラリロードでグローバル変数を消費するのはなんだかヤなので、withブロックで使い捨てスコープを形成することにする。

問題点

eval()はeval自身を呼び出した実行コンテキストをそのまま引き継ぐので（あってるのか？）ライブラリソースをevalする関数を作成すると、いつまでたってもグローバル空間にスクリプトはロードされない。

仕方ないので、ソースのロードのみ関数にして、あとはグローバルコンテキスト中でeval()することに。

で、実装

骨組みは以下の通り。

with( {
	// ライブラリのパスリスト
	libs : [
		/* ここにライブラリのパスを列挙する */
	],
	// libs[]のインデックス
	index : 0,
	// ソース取得メソッド
	getSource : function(path) {
		var stream, fso = new ActiveXObject("Scripting.FileSystemObject");
		try {
			stream = fso.OpenTextFile( path, 1 );
			return stream.ReadAll();
		} finally {
			stream.Close();
		}
	}
} ) {
	while( index < libs.length ) {
		try {
			eval( getSource( libs[ index++ ] ) );
		} catch(e) {
			WScript.Echo( e.description || e.message || "error" );
		}
	}
}

たとえば、

function test(a, b) {
	return a + b;
}

なんてソースを「lib.js」とした場合、

with( {
	// ライブラリのパスリスト
	libs : [
		"lib.js"
	],
	// libs[]のインデックス
	index : 0,
	// ソース取得メソッド
	getSource : function(path) {
		var stream, fso = new ActiveXObject("Scripting.FileSystemObject");
		try {
			stream = fso.OpenTextFile( path, 1 );
			return stream.ReadAll();
		} finally {
			stream.Close();
		}
	}
} ) {
	while( index < libs.length ) {
		try {
			eval( getSource( libs[ index++ ] ) );
		} catch(e) {
			WScript.Echo( e.description || e.message || "error" );
		}
	}
}
WScript.Echo( test( "A", "B" ) ); // 'AB'

となる。 このままだとShift_JISでローカルディスクにあるライブラリしかロードできないが、あとでXHRとADODB.Streamを組み合わせてgetSourceメソッドを書き換えればWebサーバにあるライブラリのロードもできるようになる。