1.创建ActiveX控件——按钮
2.定义一个接口,并在控件中实现
3.部署安装
4.CAB打包
5.添加到网页中进行测试
一.
创建ActiveX控件——按钮
1.新建一个Window窗体控件库项目,命名为ActiveXDemo.
2.在自动生成的UserControl1页面上添加一个button
3.点击事件里我们只弹出一个MesageBox
[csharp] view plain copy
- private void button1_Click(object sender, EventArgs e)
- {
- MessageBox.Show("Active is working now!");
- }
4.在右边解决方案资源管理器的ActiveXDemo项目上右键→属性→应用程序→程序集信息→使程序集COM可见(M)。再切换到“生成”标签→勾选“为COM互操作注册”。
5.打开Properties里面的AssemblyInof.cs文件,添加如下代码:
6.为控件创建GUID:工具→创建GUID,选5,点击复制
7.打开UserControl1.cs,在public partial class UserControl1 : UserControl上面粘贴上一步生成的GUID,并添加using System.Runtime.InteropServices;
代码如下:
[csharp] view plain copy
- using System;
- using System.Collections.Generic;
- using System.ComponentModel;
- using System.Drawing;
- using System.Data;
- using System.Linq;
- using System.Text;
- using System.Threading.Tasks;
- using System.Windows.Forms;
- using System.Runtime.InteropServices;
- namespace ActiveXDemo
- {
- [Guid("73D3BE6A-E3B3-46F7-AFFE-8673390DA3F6")]
- public partial class UserControl1: UserControl
- {
- public UserControl1()
- {
- InitializeComponent();
- }
- private void button1_Click(object sender, EventArgs e)
- {
- MessageBox.Show("ActiveX is working now!");
- }
- }
- }
二、定义一个接口,并在控件中实现
创建一个IObjectSafety接口,让ActiveX 控件获取客户端的信任。
1.右键ActiveXDemo项目—>添加—>新建项→Visual C#项→接口
注意接口内容是固定的不要修改!!!也就是说你直接复制粘贴就可以用了,不要管里面的序列号,跟上面生成的GUID不是一回事。
[csharp] view plain copy
- using System;
- using System.Runtime.InteropServices;
- namespace ActiveXDemo
- {
- [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.在UserControl1控件的后台代码UserControl1.cs中实现这个接口,代码如下:
[csharp] view plain copy
- using System;
- using System.Collections.Generic;
- using System.ComponentModel;
- using System.Drawing;
- using System.Data;
- using System.Linq;
- using System.Text;
- using System.Threading.Tasks;
- using System.Windows.Forms;
- using System.Runtime.InteropServices;
- namespace ActiveXDemo
- {
- [Guid("73D3BE6A-E3B3-46F7-AFFE-8673390DA3F6"), ProgId("ActiveXDemo.UserControl1"), ComVisible(true)]
- public partial class UserControl1 : UserControl, IObjectSafety
- {
- #region IObjectSafety 成员 格式固定
- 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
- public UserControl1()
- {
- InitializeComponent();
- }
- private void button1_Click(object sender, EventArgs e)
- {
- MessageBox.Show("ActiveX is working now!");
- }
- }
- }
注意
[csharp] view plain copy
- [Guid("73D3BE6A-E3B3-46F7-AFFE-8673390DA3F6")]
变成了
[csharp] view plain copy
- [Guid("73D3BE6A-E3B3-46F7-AFFE-8673390DA3F6"), ProgId("ActiveXDemo.UserControl1"), ComVisible(true)]
可能发生的问题
到目前为止,ActiveXDemo项目完工了,ActiveXDemo项目右键-->生成。
这个时候,我这边出现了一个错误:
错误 1 无法注销程序集“D:\learnActiveX\ActiveXDemo\ActiveXDemo\bin\Debug\ActiveXDemo.dll”- 拒绝访问。请确保您正在以管理员身份运行应用程序。不允许所请求的注册表访问权。ActiveXDemo
最后发现用管理员身份运行VS2012,然后打开ActiveXDemo项目,再生成,就不会报错了。
三、打包部署
1.解决方案ActiveXDemo右键-->添加新项目-->其他项目类型-->安装和部署。如果你没有安装过这个,请先安装。命名为ActiveSetup
2.选择application information:基本配置,自定义填写
3.接下来先把Application Files,点击MyCompany下的第一个节点可以自己重命名
4.点击 Add Project OutPuts,选择主输出点ok
5.ActiveSetup项目右键,生成。在ActiveSetup\Express\DVD-5\DiskImages\DISK1文件夹下有如下文件:
一个exe一个mis我们只用mis的
还要一个cabarc.exe这个我会在下载里给大家提供
cabarc.exe:微软提供的cab打包工具
ActiveXSetup.msi: 项目生成的部署安装文件
install.inf : 需要跟ActiveXSetup.msi打包在一起的文件
build.bat: 打包的批处理命令
install.inf
[version] signature="$CHICAGO$" AdvancedINF=2.0 [Setup Hooks] hook1=hook1 [hook1] run=msiexec.exe /i "%EXTRACT_DIR%\ActiveXSetup.msi" /qn
build.bat
"cabarc.exe" n test.cab ActiveXSetup.msi install.inf
运行一下bat就可以生成一个
cab
我们随便建一个webfrom网站
在debug下边建一下dll文件夹
把test.cab放到文件夹里
cabarc.exe:微软提供的cab打包工具 地址 :files.cnblogs.com/files/dongh/cab%E5%88%B6%E4%BD%9C%E5%B7%A5%E5%85%B7.rar