events - VB6 用户控件引发事件，如何在 VBSCRIPT 中捕获事件？

Question

我试图在 html 页面的 VBSCRIPT 中捕获一个事件，但我无法使其工作。我一定是错过了一步。

这是我的用户控件（VB6）的代码：

Public Event sendText(ByVal Text As String)

Private Sub Command1_Click()
    RaiseEvent sendText(Text1.Text)
End Sub

这是我的网页（HTML）的代码：

<form>

<OBJECT name="ActiveX" id="ActiveX" classid="clsid:..."></OBJECT>
<script language="VBScript">

Sub ActiveX_sendText(Text)
 Msgbox("aaa" & Text)
End Sub

</script>
</form>

单击 Command1 按钮时，用户控件中会引发事件，但我从未进入 VBSCRIPT 函数。

我正在使用 IE8/IE8 标准。

有什么线索吗？

Answer 1

这是 Internet Explorer 中安全规则配置的问题。启用未签名的 ActiveX 后，问题得到解决。