X-Git-Url: http://git.osdn.jp/view?a=blobdiff_plain;f=0.6.x%2Fjs%2F01_core%2F03_XScript.js;h=f32a7441e79c07eecc7197e09a468ef7a0d6334b;hb=HEAD;hp=b8255caa76057433e315f046cf18f41b4c3bc989;hpb=6b28a86cc49680dac50278ff5617bfe7a3d98613;p=pettanr%2FclientJs.git

diff --git a/0.6.x/js/01_core/03_XScript.js b/0.6.x/js/01_core/03_XScript.js
index b8255ca..f32a744 100644
--- a/0.6.x/js/01_core/03_XScript.js
+++ b/0.6.x/js/01_core/03_XScript.js
@@ -9,20 +9,20 @@ var X_Script_VBS_ENABLED = X_UA[ 'Windows' ] && !X_UA[ 'WinCE' ] && !X_UA[ 'WinP
  * @type {object}
  */
 X[ 'Script' ] = {
-	'tryCatch' : X_Script_try
+
+	'tryIfSafe' : X_Script_try,
 	
+	/**
+	 * Visual Basic Script が使えるか?
+	 * @alias X.Script.VBS
+	 * @type {boolean}
+	 */
+	'VBS'       : X_Script_VBS_ENABLED
 	// git, strict mode, asm.js, 
 };
 
 if( X_Script_VBS_ENABLED ){
 	
-/**
- * Visual Basic Script が使えるか?
- * @alias X.Script.VBS
- * @type {boolean}
- */
-	X[ 'Script' ][ 'VBS' ] = true;
-	
 	X_Script_gte15 || document.write( '<script type=text/vbscript>' +
 		[
 			'Function vbs_testAXO(v)',
@@ -62,13 +62,39 @@ if( X_Script_VBS_ENABLED ){
 			* */
 		].join( '\n' ) + '</script>' );
 
+	// http://space.geocities.jp/nequomame/others/excelvba/excelvba_01_03.html
+	// Document.ActiveElement に安全に触れるか？確認
+	// そういえば error は iframe 内で起きていた
+	// http://stackoverflow.com/questions/14378224/document-activeelement-in-iframe-shows-unspecified-error-in-ie-standards-mode
+	// document.activeElement in iframe shows unspecified error in IE standards mode
+	X_Script_gte15 || document.write( '<script type=text/vbscript>' +
+		[
+			'Function vbs_testAE()',
+				'On Error Resume Next',
+				'Set ae = Document.ActiveElement',
+				'If Err.Number Then',
+					'ae = 1',
+				'End If',
+				'Err.Clear',
+				'vbs_testAE = ae',
+			'End Function'
+		].join( '\n' ) + '</script>' );
+
 	// TODO Object のメンバを辿る vba
 	// byte Array を扱う vba
 };
 
+/**
+ * try-catch 構文が使えて安全に実行できるなら、コードを実行する
+ * @alias X.Script.tryIfSafe
+ * @param {funciton} func
+ * @param {array=} 引数の入った配列
+ */
 function X_Script_try( func, args ){
 	if( !X_Script_gte15 ){
 		//return func.apply( {}, args );
+		// window.onerror = return true を設定
+		// vbs 側から呼び出し?
 		return;
 	};
 	return X_Script_gte15( func, args || [] );