#4959
palazzo
メンバー

VBSやJSのインクルードなら、ネットを検索していると、いくつかそれらしいものにヒットしますが、関数のみのVBSやJSをExecuteメソッドやevalメソッドで読み込むのはダメなのでしょうか?

inc.vbs
Sub Test
MsgBox “Hello”
End Sub

main.vbs
Execute CreateObject(“Scripting.FileSystemObject”).OpenTextFile(“inc.vbs”, 1).ReadAll()

Call Test()

inc.js
function test(){
new ActiveXObject(“htmlfile”).Script.alert(“Hello”);
}

main.js
eval( new ActiveXObject(“Scripting.FileSystemObject”).OpenTextFile(“inc.js”, 1).ReadAll() );

test();