不错呦!smile@林凯西,确保“准备文件”中的几个文件都有安装,S...您好,看了您这篇帖子觉得很有帮助。但是有个问题想请...我的修改过了怎么还被恶意注册呢 @jjjjiiii 用PJ快9年了,主要是A...PJ3啊,貌似很少有人用PJ了,现在不是WP就是z...@332347365,我当时接入时错误码没有-10...楼主,ChkValue值应为-103是什么意思呢?...大哥 你最近能看到我发的信息,请跟我联系,我有个制...
vb开发的activex 与javascript 交互
编辑:dnawo 日期:2007-10-08
1)javascript操作activex
开发工程中,我们常会用到这种情况。比如说,当点击web控件时,使activex的某个按妞变灰。
为了实现上面的功能,我们要在activex中加一个let属性。然后在set~~中加如相应的操作代码。
这样在网页里我们就可以通过javascript来操作这个属性。
我们在activex程序中加入:
在网页中我们就可以用document.all('activex的id').TxtVisible = ture 或者false来设置txt是否显示了。
2)activex来操作javascript函数
我们在网页中加入一段javascript代码:
在activex我们可以通过如下代码来调用。
同时我们可以使用
开发工程中,我们常会用到这种情况。比如说,当点击web控件时,使activex的某个按妞变灰。
为了实现上面的功能,我们要在activex中加一个let属性。然后在set~~中加如相应的操作代码。
这样在网页里我们就可以通过javascript来操作这个属性。
我们在activex程序中加入:
复制内容到剪贴板
程序代码

Public Property Let TxtVisible(ByVal New_TxtVisible As Boolean)
Text1.visible = New_TxtVisible
PropertyChanged "BlnSystemUser"
End Property
Text1.visible = New_TxtVisible
PropertyChanged "BlnSystemUser"
End Property
在网页中我们就可以用document.all('activex的id').TxtVisible = ture 或者false来设置txt是否显示了。
2)activex来操作javascript函数
我们在网页中加入一段javascript代码:
复制内容到剪贴板
程序代码

function Test(){
alert("test")
}
alert("test")
}
在activex我们可以通过如下代码来调用。
复制内容到剪贴板
程序代码

UserControl.Parent.Script.Test()
同时我们可以使用
复制内容到剪贴板
程序代码

UserControl.Parent.Script.window.Close '关闭当前网页
UserControl.Parent.Script.document.location.href="aa.html" '更换连接
UserControl.Parent.Script.document.location.href="aa.html" '更换连接
评论: 0 | 引用: 0 | 查看次数: 4760
发表评论
请登录后再发表评论!