VS2012下制作ActiveX控件并添加到网页
为了节省时间，大部分资源取自http://www.cnblogs.com/li-peng/p/3455247.html，感谢作者。
流程概览
1.创建ActiveX控件——按钮
2.定义一个接口，并在控件中实现
3.部署安装
4.CAB打包
5.添加到网页中进行测试
一. 创建ActiveX控件——按钮
1.新建一个Window窗体控件库项目，命名为ActiveXDemo.
2.在自动生成的UserControl1页面上添加一个button
3.点击事件里我们只弹出一个MesageBox
private void button1_Click(object sender, EventArgs e)
{
MessageBox.Show("Active is working now!");
}
5.打开Properties里面的AssemblyInof.cs文件，添加如下代码：
6.为控件创建GUID：工具→创建GUID，选5，点击复制
7.打开UserControl1.cs，在public partial class UserControl1 : UserControl上面粘贴上一步生成的GUID，并添加using System.Runtime.InteropServices;
代码如下：
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不是一回事。
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中实现这个接口，代码如下：
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!");
}
}
}
注意
[Guid("73D3BE6A-E3B3-46F7-AFFE-8673390DA3F6")]变成了
[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文件夹下有如下文件：
四、使用cabarc.exe打包
1.去网上下载cabarc.exe，拷贝到ActiveSetup\Express\DVD-5\DiskImages\DISK1下。
2.在ActiveSetup\Express\DVD-5\DiskImages\DISK1下新建一个install.inf文件，内容如下：
[version]
signature="$CHICAGO$"
AdvancedINF=2.0
[Setup Hooks]
hook1=hook1
[hook1]
run=msiexec.exe /i "%EXTRACT_DIR%\ActiveXSetup.msi" /qn"cabarc.exe" n test.cab ActiveXSetup.msi install.inf 五、添加到网页中测试
1.解决方案ActiveXDemo右键-->添加新项目-->Visual C#-->web-->ASP.NET Web窗体应用程序
2.WebApplication1项目右键-->添加新项-->Visual C#-->web-->Web窗体
3.打开WebForm1.aspx，在
之间添加上面做好的控件，代码如下