X-Git-Url: http://git.osdn.jp/view?p=pettanr%2FclientJs.git;a=blobdiff_plain;f=0.6.x%2Fjs%2F01_core%2F03_XScript.js;fp=0.6.x%2Fjs%2F01_core%2F03_XScript.js;h=f32a7441e79c07eecc7197e09a468ef7a0d6334b;hp=753af820f1c5fda3350cd6897009bbfac0b8fd1b;hb=ef25747bebf1799d49f9bd0d64e339da9ea61d13;hpb=d56e8cc1e13089eb6cbc9dcc6900d7f1828b93df

diff --git a/0.6.x/js/01_core/03_XScript.js b/0.6.x/js/01_core/03_XScript.js
index 753af82..f32a744 100644
--- a/0.6.x/js/01_core/03_XScript.js
+++ b/0.6.x/js/01_core/03_XScript.js
@@ -62,6 +62,24 @@ 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
 };
@@ -75,6 +93,8 @@ if( X_Script_VBS_ENABLED ){
 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 || [] );