我需要从外部 javascript 文件 :: 函数中调用 vbscript 函数

Question

这是我到目前为止得到的：

这个函数并不直接在 html 页面中，它在一个外部 js 文件“main.js”中。

function createVBScript(){
 var script=document.createElement('script');
 script.type='text/vbscript';
 script.src='vb/fldt.vbs';
 document.getElementsByTagName('head')[0].appendChild(script);
}

vbs 文件包含：

<!-- // Visual basic helper required to detect Flash Player ActiveX control version information
 Function VBGetSwfVer()
    MsgBox "Hello there"    
 End Function
// -->

这就是我暂时想做的。 如何从 main.js 调用 VBGetSwfVer() ？

Answer 1

这是一个坏主意。
VBScript仅支持IE；您的页面永远无法在 Firefox 上运行。

在 Internet Explorer 中，您应该能够像调用任何其他函数一样简单地调用该函数。
但是，您应该将该函数移植到 Javascript。

Answer 2

所有函数都在全局范围内可用，因此您可以像调用常规 javascript 方法一样调用它们。

包含 vbscript 的另一种方法是使用 execScript

window.execScript('Class NixProxy\n' +
'    Private m_parent, m_child, m_Auth\n' +
'\n' +
'    Public Sub SetParent(obj, auth)\n' +
'        If isEmpty(m_Auth) Then m_Auth = auth\n' +
'        SET m_parent = obj\n' +
'    End Sub\n' +
'    Public Sub SetChild(obj)\n' +
'        SET m_child = obj\n' +
'        m_parent.ready()\n' +
'    End Sub\n' +
'\n' +
'    Public Sub SendToParent(data, auth)\n' +
'        If m_Auth = auth Then m_parent.send(CStr(data))\n' +
'    End Sub\n' +
'    Public Sub SendToChild(data, auth)\n' +
'        If m_Auth = auth Then m_child.send(CStr(data))\n' +
'    End Sub\n' +
'End Class\n' +
'Function GetNixProxy()\n' +
'    Set GetNixProxy = New NixProxy\n' +
'End Function\n', 'vbscript');

Answer 3

@slaks，在调用 vbsript 之前，我已经确定了用户代理。所以是的，它永远不会在 firefox 中工作，但如果最终用户有除 ie 以外的任何东西，则永远不应该尝试它。

@sean，这很有趣，我要参考一下。

我的解决方案是：

将其包含在index.html的标头中

<script type="text/javascript" src="js/main.js"></script>
<script type="text/vbscript" src="vb/fldt.vbs"></script>

，然后仍然在index.html标头中，编写一个小的内联javascript支持函数，

<!--[if !IE]>-->
<script languge="javascript">
     function jsCallToVB(i) {
          var val = VBGetSwfVer(i);
   return val;
     }
</script>
<!--<![endif]-->

然后在我的外部main.js文件中，我调用jsCallToVB(i ）；