1,453
社区成员
发帖
与我相关
我的任务
分享网页怎么和ActiveX交互?
能不能帮我做个以下要求的例子？
1、用VB做一个ActiveX控件，插入到网页中，运行网页，点击ActiveX控件中的按钮把ActiveX控件中的两个变量在网页上显示出来。
2、点击网面上的按钮，在ActiveX控件上显示网页上传送过来两个变量的值。
我只会一些VB编程，会普通的网页制作。网上找了很久都没实现以上功能。有人能帮我解决吗？谢谢
VB控件代码是
Option Explicit
Private Sub Timer1_Timer()
lblTime.Caption = Time
End Sub
Public Property Get UpdateInterval() As Variant
Label1.Caption = "OK"
End Property
Public Property Let UpdateInterval(ByVal vNewValue As Variant)
Timer1.Interval = vNewValue
PropertyChanged "UpdateInterval"
End Property
保存的控件名是MyCtr.ocx
在网页的代码是：
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
时钟
<OBJECT ID=MyCtr classid="clsid:B916CD37-E0BF-4368-8BCB-1D98F3F2166C">
</OBJECT>
<script >
MyCtr.UpdateInterval()
</script>
</body>
</html>
<script > </script> 内是想调用这个方法但不成功，请问正确的语句是什么？
1、用VB做一个ActiveX控件，插入到网页中，运行网页，点击ActiveX控件中的按钮把ActiveX控件中的两个变量在网页上显示出来。
2、点击网面上的按钮，在ActiveX控件上显示网页上传送过来两个变量的值。
我只会一些VB编程，会普通的网页制作。网上找了很久都没实现以上功能。有人能帮我解决吗？谢谢
VB控件代码是
Option Explicit
Private Sub Timer1_Timer()
lblTime.Caption = Time
End Sub
Public Property Get UpdateInterval() As Variant
Label1.Caption = "OK"
End Property
Public Property Let UpdateInterval(ByVal vNewValue As Variant)
Timer1.Interval = vNewValue
PropertyChanged "UpdateInterval"
End Property
保存的控件名是MyCtr.ocx
在网页的代码是：
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
时钟
<OBJECT ID=MyCtr classid="clsid:B916CD37-E0BF-4368-8BCB-1D98F3F2166C">
</OBJECT>
<script >
MyCtr.UpdateInterval()
</script>
</body>
</html>
<script > </script> 内是想调用这个方法但不成功，请问正确的语句是什么？
...全文
请发表友善的回复…
发表回复
threenewbee 2010-05-19
- 打赏
- 举报
[Quote=引用 16 楼 dengzw602 的回复:]
"让用户本地运行一个安装程序"这个怎么原理？因为我想做的不是木马，可告知用户安装的。不过我不想专户做成一个软件，我还是想放到网页上运行。
[/Quote]
就是做成一个安装包给用户下载。
"让用户本地运行一个安装程序"这个怎么原理？因为我想做的不是木马，可告知用户安装的。不过我不想专户做成一个软件，我还是想放到网页上运行。
[/Quote]
就是做成一个安装包给用户下载。
dengzw602 2010-05-18
- 打赏
- 举报
"让用户本地运行一个安装程序"这个怎么原理？因为我想做的不是木马，可告知用户安装的。不过我不想专户做成一个软件，我还是想放到网页上运行。
threenewbee 2010-05-18
- 打赏
- 举报
[Quote=引用 14 楼 dengzw602 的回复:]
应该有可以不花钱也能完全使用的吧？我看我们公司有些局域网（不能上外网）。网页登录公司办公网页（要安装ActiveX控件），第一次运行也是要安装，之后就能正常运行，说明在服务器传过来的Activex控件能完全安装完成，不用上网验证。
有人能说说这个ActiveX控件签证这方面的知识吗？
[/Quote]
那需要让用户本地运行一个安装程序。这个过程必须用户参与。
或者利用系统的漏洞。
总之因为ActiveX可以操作本地资源，所以web上的没有认证的activex是不可能在用户没有授权的情况下被执行的。不然这是非常恐怖的事情。
应该有可以不花钱也能完全使用的吧？我看我们公司有些局域网（不能上外网）。网页登录公司办公网页（要安装ActiveX控件），第一次运行也是要安装，之后就能正常运行，说明在服务器传过来的Activex控件能完全安装完成，不用上网验证。
有人能说说这个ActiveX控件签证这方面的知识吗？
[/Quote]
那需要让用户本地运行一个安装程序。这个过程必须用户参与。
或者利用系统的漏洞。
总之因为ActiveX可以操作本地资源，所以web上的没有认证的activex是不可能在用户没有授权的情况下被执行的。不然这是非常恐怖的事情。
dengzw602 2010-05-18
- 打赏
- 举报
应该有可以不花钱也能完全使用的吧？我看我们公司有些局域网（不能上外网）。网页登录公司办公网页（要安装ActiveX控件），第一次运行也是要安装，之后就能正常运行，说明在服务器传过来的Activex控件能完全安装完成，不用上网验证。
有人能说说这个ActiveX控件签证这方面的知识吗？
有人能说说这个ActiveX控件签证这方面的知识吗？
dengzw602 2010-05-18
- 打赏
- 举报
那就是说就算搞了数字签名，不花钱买还是有提示的？
threenewbee 2010-05-18
- 打赏
- 举报
[Quote=引用 11 楼 dengzw602 的回复:]
我已做好数字签名，找开网页已有提示安装，安装好后还是有以下提示“在此面上的ActiveX控件和页上的其他部份的交互可能不安全。你想允许这种交互吗？”每次都有这个提示哟，可以去掉这个提示吗？
[/Quote]
要把证书安装到计算机上，使得IE将他视为信任的区域，这样数字签名就有用了。自己颁发的证书默认是不被信任的。
我已做好数字签名，找开网页已有提示安装，安装好后还是有以下提示“在此面上的ActiveX控件和页上的其他部份的交互可能不安全。你想允许这种交互吗？”每次都有这个提示哟，可以去掉这个提示吗？
[/Quote]
要把证书安装到计算机上，使得IE将他视为信任的区域，这样数字签名就有用了。自己颁发的证书默认是不被信任的。
dengzw602 2010-05-17
- 打赏
- 举报
怎么给自己颁发证书？有这方面的详细资料吗？谢谢
东方之珠 2010-05-17
- 打赏
- 举报
DHTML
dengzw602 2010-05-17
- 打赏
- 举报
我已做好数字签名，找开网页已有提示安装，安装好后还是有以下提示“在此面上的ActiveX控件和页上的其他部份的交互可能不安全。你想允许这种交互吗？”每次都有这个提示哟，可以去掉这个提示吗？
threenewbee 2010-05-17
- 打赏
- 举报
[Quote=引用 8 楼 dengzw602 的回复:]
怎么给自己颁发证书？有这方面的详细资料吗？谢谢
[/Quote]
windows platform sdk 里面有制作证书和签名的命令行工具。
怎么给自己颁发证书？有这方面的详细资料吗？谢谢
[/Quote]
windows platform sdk 里面有制作证书和签名的命令行工具。
threenewbee 2010-05-16
- 打赏
- 举报
[Quote=引用 6 楼 dengzw602 的回复:]
不是吧，我只是学习在网页中加入ActiveX控件，这也要用钱买呀，有人能和我说说这是怎么回事吗？不买别人就不能正常访问我的网页吗？
[/Quote]
如果是学习，你可以自己给自己颁发一个证书，然后访问的客户端需要手工导入一下。
或者调整IE安全设置，允许没有数字签名的activex运行。
不是吧，我只是学习在网页中加入ActiveX控件，这也要用钱买呀，有人能和我说说这是怎么回事吗？不买别人就不能正常访问我的网页吗？
[/Quote]
如果是学习，你可以自己给自己颁发一个证书，然后访问的客户端需要手工导入一下。
或者调整IE安全设置，允许没有数字签名的activex运行。
dengzw602 2010-05-16
- 打赏
- 举报
不是吧，我只是学习在网页中加入ActiveX控件，这也要用钱买呀，有人能和我说说这是怎么回事吗？不买别人就不能正常访问我的网页吗？
threenewbee 2010-05-16
- 打赏
- 举报
[Quote=引用 2 楼 dengzw602 的回复:]
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" conte……
[/Quote]
那当然。可以降低IE的安全性，或者购买一个数字签名。
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" conte……
[/Quote]
那当然。可以降低IE的安全性，或者购买一个数字签名。
dengzw602 2010-05-16
- 打赏
- 举报
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<p><a href="#" onMouseDown="xx()">时钟</a></p>
<!--以下为一个ocx控件-->
<object
id="MyCtr"
classid="clsid:B916CD37-E0BF-4368-8BCB-1D98F3F2166C"
name= "devread"
width=100%
height=210
align=middle
hspace=0
vspace=0 >
</object>
</script>
<!-- 定义Delphi中访问的OnCall事件对应的Script方法 -->
<SCRIPT type="text/javascript" FOR="devread" EVENT="OnCall(AID,AName)" >
<!-- insert script commands -->
devread.UpdateInterval();
</SCRIPT>
</p>
</body>
</html>
用以上代码，出现以下提示
“internet explorer 已经阻止此站点以不安全的方式使用ActiveX控件。因此，此页可能显示不正确。”
点击以上有“有何风险”和“信息栏帮助”
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<p><a href="#" onMouseDown="xx()">时钟</a></p>
<!--以下为一个ocx控件-->
<object
id="MyCtr"
classid="clsid:B916CD37-E0BF-4368-8BCB-1D98F3F2166C"
name= "devread"
width=100%
height=210
align=middle
hspace=0
vspace=0 >
</object>
</script>
<!-- 定义Delphi中访问的OnCall事件对应的Script方法 -->
<SCRIPT type="text/javascript" FOR="devread" EVENT="OnCall(AID,AName)" >
<!-- insert script commands -->
devread.UpdateInterval();
</SCRIPT>
</p>
</body>
</html>
用以上代码，出现以下提示
“internet explorer 已经阻止此站点以不安全的方式使用ActiveX控件。因此，此页可能显示不正确。”
点击以上有“有何风险”和“信息栏帮助”
threenewbee 2010-05-16
- 打赏
- 举报
参考：http://blog.csdn.net/gloomyboyo/archive/2007/12/08/1924778.aspx
threenewbee 2010-05-16
- 打赏
- 举报
[Quote=引用 4 楼 dengzw602 的回复:]
购买一个数字签名?和谁买？
[/Quote]
推荐 VeriSign
参考：http://verisign.wosign.com/price.htm
购买一个数字签名?和谁买？
[/Quote]
推荐 VeriSign
参考：http://verisign.wosign.com/price.htm
dengzw602 2010-05-16
- 打赏
- 举报
购买一个数字签名?和谁买？
