随笔 - 48  文章 - 2  评论 - 432 

C#编写ActiveX控件(二)

                            Homer

 

       在我的上一篇blog中,已经实现了一个最基本的ActiveX控件。当然,我们编写的任务还没有完成。首先,我们先尝试实现和JS的交互能力。

 

       我们在Demo中加ShowMessage方法:
public void ShowMessage(string msg)
        
{
            
if(msg != null)
            
{
                MessageBox.Show(msg);
            }

        }

我们重新编译。在重新访问页面之前,我们先来修改html代码:
<body bgcolor='#223344'>
<object id="helloworld"
   classid
="clsid:9551B223-6188-4387-B293-C7D9D8173E3A" Width="184" Height="96"
>
</object>
<br>
<input type='button' onclick='helloworld.ShowMessage(“Hello World!”)' value='Click'>
</body>

现在,重新访问http://localhost/helloworld.htm,单击Click按钮,应该可以实现交互了。

 

    但是结果却很遗憾,我们发现IE跳出了对话框,如图所示:

单击确定之后,我们发现JS报错。根据提示,我们判断可以通过修改IE的设置使控件运行。打开IE的 工具——〉Internet选项——〉安全——〉本地Intranet——〉自定义级别——〉对没有标记为安全的ActiveX控件进行初始化和运行,将其值设为启用。我们刷新页面,现在终于可以正确运行了。
 

    当然,我们不能指望我们的客户和我们一样修改这个值。毕竟,一是操作麻烦,二是给电脑带来了很大的安全风险。在互联网上搜索之后,发现必须要实现IObjectSafety接口,把ActiveX控件标记为安全的ActiveX控件。在搜索MSDN之后,我找到了IObjectSafety接口的定义。这就好办了。首先我们自己用C#实现这个接口:

[Guid("CB5BDC81-93C1-11CF-8F20-00805F2CD064"),InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
    
public interface IObjectSafety
    
{
        
// methods
        void GetInterfacceSafyOptions(
            System.Int32 riid,
            
out System.Int32 pdwSupportedOptions,
            
out System.Int32 pdwEnabledOptions);
        
void SetInterfaceSafetyOptions(
            System.Int32 riid,
            System.Int32 dwOptionsSetMask,
            System.Int32 dwEnabledOptions);        
    }

注意,这个GUID是不能改的。然后,我们在Demo类里面实现这个接口。增加一下代码:

IObjectSafety 成员

重新编译,然后将IE里面的设置改回来。现在,我们发现,和JS的交互已经没有问题了。

    这样,一个最基本的ActiveX控件已经写好了。你可以在这个控件的基础上增加任何你需要的功能。到这里,编写控件的任务已经完成了,我们的下一个目标就是发布它。

红马天下 版权所有
博客:http://homer.cnblogs.com/
欢迎转载,但转载必须注明作者和出处。

posted on 2005-01-08 21:16 红马天下 阅读(33838) 评论(54) 编辑 收藏

 回复 引用   
#1楼 2005-01-12 10:18 | softye
期待 :用C#编写ActiveX控件(三)(分发)

楼主加油哦

 回复 引用 查看   
#2楼 2005-01-16 10:54 | 水云间      
很不错,支持一下,但这里有一个问题,就是控件里怎么调用页面的JS脚本,期待中。。。。。。
 回复 引用 查看   
#3楼 2005-01-16 13:56 | 水云间      
http://www.cnblogs.com/liubiqu/articles/92632.html

我做好那个控件里调用外面JS的方法,但就是发布的也写了一些,可能有些需要修正的地方。大家有空交流一下。 MSN:liubiqu@hotmail.com

 回复 引用   
#4楼 2005-01-18 16:44 | ares
为什么照着楼主说的做了,还是遇到两个问题:
一、我先编译了一次,看到了文本内容,后来添加了showmessage方法后再编译,在html加入代码后,点击却没有信息弹出,也没报js错误。为什么??


二、为何在另外的机器上,看上去还是红叉?

盼答复

 回复 引用   
#5楼 2005-01-22 05:34 | xxy[未注册用户]
非常感谢,等待下一大做
 回复 引用   
#6楼 2005-03-07 13:09 | addyou
需要将DEMO类添加上IObjectSafety接口
public class DEMO : System.Windows.Forms.UserControl, IObjectSafety

 回复 引用   
#7楼 2005-05-17 13:56 | hawkclj
IObjectSafety接口的Guid("CB5BDC81-93C1-11CF-8F20-00805F2CD064")是怎么产生的!怎么跟Demo那边的Guid不一样,望指导一下!MSN hawkclj@hotmail.com
 回复 引用 查看   
#8楼[楼主] 2005-05-17 16:30 | 红马天下      
是这样的,IObjectSafety接口是微软定义的一个标准接口,自身也对应一个GUID,就是文中的那个。这个GUID是不可以更改的。Demo的那个GUID是你所编写的ActiveX控件的GUID值。两者不要混淆。
 回复 引用   
#9楼 2005-05-18 09:08 | hawkclj
谢谢红马天下的回答,我还想问一下,对C#编写的ActiveX控件与数据库服务器的数据交互有什么好的建议和参考吗?谢谢
 回复 引用 查看   
#10楼[楼主] 2005-05-18 22:24 | 红马天下      
我不明白你这样做的目的是什么。但是我想,不要用C#编写的ActiveX控件的方法实现什么业务逻辑之类的工作,那还不如用直接.net开发组件得了。我当时编写这种控件的出发点是为了实现客户端的交互,这一点可以从我的例子中看到。
 回复 引用   
#11楼 2005-05-19 11:18 | hawkclj
红马天下,可以公布一下QQ或者MSN,希望能跟你有进一步的交流!
 回复 引用   
#12楼 2005-07-04 14:07 | macless
我按照你的方法做了一下,在本机上是可以正常显示的,但是在其他的电脑上就不能正常显示呀
 回复 引用 查看   
#13楼[楼主] 2005-07-05 09:00 | 红马天下      
不能显示可能有两个原因.一是你可能没有在其他电脑安装framework,二是你可能没有在其他电脑上安装这个控件。
 回复 引用   
#14楼 2005-07-05 14:42 | 燃灯[未注册用户]
那个IObjectSafety的实现代码你没有写:

需要将DEMO类添加上IObjectSafety接口
public class DEMO : System.Windows.Forms.UserControl, IObjectSafety

这个只是说明需要实现这个接口。

#region IObjectSafety
void IObjectSafety.GetInterfacceSafyOptions( System.Int32 riid,out System.Int32 pdwSupportedOptions,out System.Int32 pdwEnabledOptions)
{
}
void IObjectSafety.SetInterfaceSafetyOptions( System.Int32 riid,System.Int32 dwOptionsSetMask,System.Int32 dwEnabledOptions)
{
}
#endregion

我这样写空的实现,编译有错误。

 回复 引用   
#15楼 2005-07-05 14:43 | 燃灯[未注册用户]
那个IObjectSafety的实现代码你没有写:

需要将DEMO类添加上IObjectSafety接口
public class DEMO : System.Windows.Forms.UserControl, IObjectSafety

这个只是说明需要实现这个接口。

#region IObjectSafety
void IObjectSafety.GetInterfacceSafyOptions( System.Int32 riid,out System.Int32 pdwSupportedOptions,out System.Int32 pdwEnabledOptions)
{
}
void IObjectSafety.SetInterfaceSafetyOptions( System.Int32 riid,System.Int32 dwOptionsSetMask,System.Int32 dwEnabledOptions)
{
}
#endregion

我这样写空的实现,编译有错误。

 回复 引用   
#16楼 2005-07-05 14:49 | 燃灯[未注册用户]
还有一个问题,就是那个签名的事,我怎么都无法实现真正的签名。

http://classad.cbbn.net/a.htm 这是一个例子,弹出询问窗口后,即便是按yes同意安装,那个activex仍然是一个红x.

 回复 引用   
#17楼 2005-12-30 10:04 | kofi_hust[未注册用户]
我按照楼主说的做了,编译有个问题,提示说[Guid("CB5BDC81-93C1-11CF-8F20-00805F2CD064"),InterfaceType(ComInterfaceType.InterfaceIsIUnknown)] 和自己生成guid的那个重复定义,是怎么回事啊?
 回复 引用 查看   
#18楼 2006-01-04 16:33 | DrkBreeze's Bolg      
我测试过了,项目编译时 com interop注册 为 false ,即使继承了 IObjectSafety接口 仍然无法躲过CA 的检查. 仍然会跳出IE对话框. 不知道 楼主 到底是怎么测试实现的.
 回复 引用   
#19楼 2006-01-09 12:02 | 爱与折磨[未注册用户]
按照楼主的做法,果然实现的,谢谢楼主,感动中...
 回复 引用   
#20楼 2006-03-20 16:36 | lxcache[未注册用户]
按你的说一步一步做的,显示的是红叉,怎么回事?
 回复 引用   
#21楼 2006-06-19 19:22 | 虚拟主机[未注册用户]
站长好厉害哟,学到了不少东西
 回复 引用   
#22楼 2006-07-11 15:35 | wingtiger.Qiu[未注册用户]
都是骗人的,在客户端访问根本不会成功。我都作了1000次了,代码也对照1000次了,就是不成功。在本机好使,用别的机器访问我的机器根本就不行。
 回复 引用   
#23楼 2006-07-20 14:00 | lizhi[未注册用户]
请问有没有C#写的html解析啊?

比如说:数据库里面有 : <input id="txtName" type="text" value="新增流程分类" /> 这一个 text 类型的数据!


现在,我需要写一段解析代码, 它可以解析到<> , input , id , 还有 value 里面的值等. 并在网页中显示出来!

大哥们,救救急啊!

万分感谢啊~~~请发往邮箱: lizhi198304@163.com

 回复 引用   
#24楼 2006-10-23 10:15 | 董永亮[未注册用户]
请楼主把那个实现安全接口的操作步骤详细讲解一下如何,我操作了N次,还是有安全提示。
 回复 引用   
#25楼 2006-11-06 15:56 | bluewater[未注册用户]
版主確實是只能在本機上運行。為什麼不能在別的機器上運行呢?要是那樣的話。就沒意義了。
 回复 引用   
#26楼 2007-01-18 20:03 | Namebus[未注册用户]
http://www.openssl.com.cn/thread-101-1-1.html

看到一个网站有免费的国际认证代码签名证书申请

 回复 引用   
#27楼 2007-03-13 11:55 | 虚拟主机[未注册用户]
当然,我们不能指望我们的客户和我们一样修改这个值。
 回复 引用   
#28楼 2007-03-13 11:56 | 域名注册[未注册用户]
这个只是说明需要实现这个接口。
 回复 引用   
#29楼 2007-04-07 13:20 | 我是谁[未注册用户]
我定义了ShowMessage()方法。但是他提示"对象不支持此属性和方法"!
 回复 引用   
#30楼 2007-04-18 09:31 | feng[未注册用户]
我想麻烦问你知道如何用ActiveX控件编程实现Labwindows/CVI里的一个功能,其实我还没有想好是实现怎样的功能,你能帮我想想吧 谢谢你!请发往邮箱 fengguole0325@163.com
 回复 引用   
#31楼 2007-04-18 16:01 | fengziyoyo[未注册用户]
按照楼住的作了,在vs2005+ie7的环境下,类库的注册为com属性,显示com
组件也实现了IObjectSafty,可以显示插件,但是还是没有实现交互,希望楼住指点,还有那些地方没考虑到的

 回复 引用   
#32楼 2007-05-09 15:02 | 木其子[未注册用户]
为什么我下了源码,编译了以后,还是显示一个红色叉叉啊,我的VS2005+IE6,楼主Help啊!
 回复 引用   
#33楼 2007-06-28 11:40 | 昆[未注册用户]
我下载了你的代码,试了试但是还是要把IE的安全降低才行啊。
究竟是什么问题啊。还有就是关于签名的问题。可以详细说一下吗?

 回复 引用   
#34楼 2007-09-16 11:04 | lj_lt[未注册用户]
vs2005做的控件VB6下使用,输入汉字为什么是乱码?
比如说vs2005的textbox,combo
在VB下使用
输入汉字,显示是乱码
复制,粘贴到上面没问题
奇怪了

 回复 引用   
#35楼 2007-09-30 17:20 | adf[未注册用户]
在别的机器上不能访问
 回复 引用   
#36楼 2007-11-17 16:54 | 横刀向天笑[未注册用户]
我写了一个ActiveX控件 现在通过 button 将参数传给控件没有问题,但是我想在初始化页面的时候将参数直接传给控件不知道哪位兄弟帮忙解决一下。
<object id ="WebPrint" classid="clsid:{55A93796-E652-4edb-B12F-7C618875F4DD}" height="40" width="800" viewastext></object>
<script language="javascript" type="text/javascript">
WebPrint.StrXMLPath="G:\\XML.xml";
</script>
上面的代码执行没有效果,提示StrXMLPath为空。

 回复 引用   
#37楼 2007-12-03 22:35 | 冰雨[未注册用户]
楼主的接口实现方法有问题,按照你写的,在IE下同样要报:未信任的ActiveX控件,正确的方法应该是:

1.接口
[ComImport, GuidAttribute("CB5BDC81-93C1-11CF-8F20-00805F2CD064")]
[InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
public interface IObjectSafety
{
[PreserveSig]
int GetInterfaceSafetyOptions(ref Guid riid, [MarshalAs(UnmanagedType.U4)] ref int pdwSupportedOptions,[MarshalAs(UnmanagedType.U4)] ref int pdwEnabledOptions);
[PreserveSig()]
int SetInterfaceSafetyOptions(ref Guid riid,[MarshalAs(UnmanagedType.U4)] int dwOptionSetMask,[MarshalAs(UnmanagedType.U4)] int dwEnabledOptions);
}

2.实现
private const string _IID_IDispatch = "{00020400-0000-0000-C000-000000000046}";
private const string _IID_IDispatchEx = "{a6ef9860-c720-11d0-9337-00a0c90dcaa9}";
private const string _IID_IPersistStorage = "{0000010A-0000-0000-C000-000000000046}";
private const string _IID_IPersistStream = "{00000109-0000-0000-C000-000000000046}";
private const string _IID_IPersistPropertyBag = "{37D84F60-42CB-11CE-8135-00AA004BB851}";

private const int INTERFACESAFE_FOR_UNTRUSTED_CALLER = 0x00000001;
private const int INTERFACESAFE_FOR_UNTRUSTED_DATA = 0x00000002;
private const int S_OK = 0;
private const int E_FAIL = unchecked((int)0x80004005);
private const int E_NOINTERFACE = unchecked((int)0x80004002);

private bool _fSafeForScripting = true;
private bool _fSafeForInitializing = true;
public int GetInterfaceSafetyOptions(ref Guid riid, ref int pdwSupportedOptions, ref int pdwEnabledOptions)
{
int Rslt = E_FAIL;
string strGUID = riid.ToString("B");
pdwSupportedOptions = INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA;
switch (strGUID)
{
case _IID_IDispatch:
case _IID_IDispatchEx:
Rslt = S_OK;
pdwEnabledOptions = 0;
if (_fSafeForScripting == true)
pdwEnabledOptions = INTERFACESAFE_FOR_UNTRUSTED_CALLER;
break;
case _IID_IPersistStorage:
case _IID_IPersistStream:
case _IID_IPersistPropertyBag:
Rslt = S_OK;
pdwEnabledOptions = 0;
if (_fSafeForInitializing == true)
pdwEnabledOptions = INTERFACESAFE_FOR_UNTRUSTED_DATA;
break;
default:
Rslt = E_NOINTERFACE;
break;
}

return Rslt;
}

public int SetInterfaceSafetyOptions(ref Guid riid, int dwOptionSetMask, int dwEnabledOptions)
{
int Rslt = E_FAIL;

string strGUID = riid.ToString("B");
switch (strGUID)
{
case _IID_IDispatch:
case _IID_IDispatchEx:
if (((dwEnabledOptions & dwOptionSetMask) == INTERFACESAFE_FOR_UNTRUSTED_CALLER) && (_fSafeForScripting == true))
Rslt = S_OK;
break;
case _IID_IPersistStorage:
case _IID_IPersistStream:
case _IID_IPersistPropertyBag:
if (((dwEnabledOptions & dwOptionSetMask) == INTERFACESAFE_FOR_UNTRUSTED_DATA) && (_fSafeForInitializing == true))
Rslt = S_OK;
break;
default:
Rslt = E_NOINTERFACE;
break;
}

return Rslt;
}
#endregion

 回复 引用   
#38楼 2007-12-20 23:58 | 洋洋0821[未注册用户]
编译错误: 不会实现接口成员“IObjectSafety.GetInterfacceSafyOptions(int, out int, out int)”?

我测了,是没有问题的,谢谢homer了
你们上面的说有问题是因为你们方法不对

 回复 引用   
#40楼 2008-04-28 18:13 | lyb0002280[未注册用户]
我来说一句,
我也成功了,最关键的一点就是在AssemblyInfo.cs中的[assembly: ComVisible(true)]
卡了我好久,我不知道要改为true

 回复 引用   
#41楼 2008-07-24 13:36 | xue_huashan[未注册用户]
不实现接口没有问题,怎么实现后浏览器报“Internet Explorer 已经阻止此站点用不安全方式使用 ActiveX 控件。因此,此页可能显示不正确。”
 回复 引用   
#42楼 2009-03-05 17:15 | 许仙儿
接口实现写到哪儿?写到UserControl1.cs中吗?

PS:我的是vs2005~

 回复 引用   
#43楼 2009-05-02 19:19 | myitm[未注册用户]
这样写的ActiveX控件 在客户端还要安装framework ,有点不爽,至少现在是不切实际,因为很多人都没安装framework
 回复 引用   
#44楼 2009-05-25 18:08 | GeogeryTony[未注册用户]
在火狐和其他浏览器上面没有IE里面的内容,怎么才能使得火狐和其他浏览器一样,谢谢,有空回我,qinyihuahua@163.com,谢谢!
 回复 引用   
#45楼 2009-09-06 17:45 | 狗b去死[未注册用户]
你个逼不会不要瞎写
 回复 引用   
#46楼 2009-09-18 09:19 | 游龙踏雪[未注册用户]
引用狗b去死:你个逼不会不要瞎写

你这素质

 回复 引用 查看   
#47楼 2009-10-15 11:13 | 九月烟花梦      
引用我是谁:我定义了ShowMessage()方法。但是他提示"对象不支持此属性和方法"!


我也是这个错误,vs2005下写的,,

 回复 引用 查看   
#48楼 2010-04-21 10:36 | 暮日风远      
非常感谢homer,我的可以用,环境vs2008
完全代码
Demo.cs
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Drawing;
using System.Data;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.Runtime.InteropServices;

namespace HelloWorld
{
[Guid("CB5BDC81-93C1-11CF-8F20-00805F2CD064"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
public interface IObjectSafety
{
// methods
void GetInterfacceSafyOptions(
System.Int32 riid,
out System.Int32 pdwSupportedOptions,
out System.Int32 pdwEnabledOptions);
void SetInterfaceSafetyOptions(
System.Int32 riid,
System.Int32 dwOptionsSetMask,
System.Int32 dwEnabledOptions);
}

[Guid("58993762-9895-4c41-9815-5A440D7F31BC")]
public partial class Demo : UserControl,IObjectSafety
{
public Demo()
{
InitializeComponent();
}
public void ShowMessage(string msg)
{
if (msg != null)
{
MessageBox.Show(msg);
}
}

#region IObjectSafety Members

void IObjectSafety.GetInterfacceSafyOptions(int riid, out int pdwSupportedOptions, out int pdwEnabledOptions)
{
pdwSupportedOptions = 1;
pdwEnabledOptions = 2;
}

void IObjectSafety.SetInterfaceSafetyOptions(int riid, int dwOptionsSetMask, int dwEnabledOptions)
{

}

#endregion
}
}


AssemblyInfo.cs
using System.Reflection;
using System.Runtime.CompilerServices;
using System.Runtime.InteropServices;
using System.Security;

// General Information about an assembly is controlled through the following
// set of attributes. Change these attribute values to modify the information
// associated with an assembly.
[assembly: AssemblyTitle("HelloWorld")]
[assembly: AssemblyDescription("")]
[assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("FOUNDERTECH")]
[assembly: AssemblyProduct("HelloWorld")]
[assembly: AssemblyCopyright("Copyright © FOUNDERTECH 2010")]
[assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")]
[assembly: AllowPartiallyTrustedCallers()]

// Setting ComVisible to false makes the types in this assembly not visible
// to COM components. If you need to access a type in this assembly from
// COM, set the ComVisible attribute to true on that type.
[assembly: ComVisible(true)]

// The following GUID is for the ID of the typelib if this project is exposed to COM
[assembly: Guid("e6c239a2-f10d-4e68-91d0-bd2f93721495")]

// Version information for an assembly consists of the following four values:
//
// Major Version
// Minor Version
// Build Number
// Revision
//
// You can specify all the values or you can default the Build and Revision Numbers
// by using the '*' as shown below:
// [assembly: AssemblyVersion("1.0.*")]
[assembly: AssemblyVersion("1.0.0.0")]
[assembly: AssemblyFileVersion("1.0.0.0")]

helloworld.htm
<html>
<head>
<title>Untitled Page</title>
<style type="text/css">
#Object1
{
height: 330px;
width: 363px;
}
#helloworld
{
height: 334px;
width: 476px;
}
</style>
</head>
<body >
<!--<object id="helloworld" classid="http://localhost/HelloWorld.dll#HelloWorld.Demo"> </object>-->
<object id="helloworld" classid="clsid:58993762-9895-4c41-9815-5A440D7F31BC"> </object>
<input type="button" onclick="helloworld.ShowMessage('Hello World!')" value="摁我"
style="height: 190px; width: 377px" /><br/>
&nbsp;

</body>
</html>

 回复 引用 查看   
#49楼 2010-07-01 17:30 | bicabo      
学完了楼主的第一篇,能运行出效果了.
现在来学第二篇了.希望能学会基本的应用!
嘿嘿.支持楼主,继续发精品!

 回复 引用 查看   
#50楼 2011-09-09 10:58 | 6572789      
好好学习天天向上