在vs中新建web程序 添加html页,VS2012下制作ActiveX控件并添加到网页

为了节省时间,大部分资源取自http://www.cnblogs.com/li-peng/p/3455247.html,感谢作者。

流程概览

1.创建ActiveX控件——按钮

2.定义一个接口,并在控件中实现

3.部署安装

4.CAB打包

5.添加到网页中进行测试

一. 创建ActiveX控件——按钮

1.新建一个Window窗体控件库项目,命名为ActiveXDemo.

0818b9ca8b590ca3270a3433284dd417.png

2.在自动生成的UserControl1页面上添加一个button

0818b9ca8b590ca3270a3433284dd417.png

3.点击事件里我们只弹出一个MesageBox

private void button1_Click(object sender, EventArgs e)

{

MessageBox.Show("Active is working now!");

}4.

在右边解决方案资源管理器的ActiveXDemo项目上右键→属性→应用程序→程序集信息→使程序集COM可见(M)。再切换到“生成”标签→勾选“为COM互操作注册”。

0818b9ca8b590ca3270a3433284dd417.png

0818b9ca8b590ca3270a3433284dd417.png

0818b9ca8b590ca3270a3433284dd417.png

5.打开Properties里面的AssemblyInof.cs文件,添加如下代码:

0818b9ca8b590ca3270a3433284dd417.png

6.为控件创建GUID:工具→创建GUID,选5,点击复制

0818b9ca8b590ca3270a3433284dd417.png

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

0818b9ca8b590ca3270a3433284dd417.png

2.选择application information:基本配置,自定义填写

0818b9ca8b590ca3270a3433284dd417.png

3.接下来先把Application Files,点击MyCompany下的第一个节点可以自己重命名

0818b9ca8b590ca3270a3433284dd417.png

4.点击 Add Project OutPuts,选择主输出点ok

0818b9ca8b590ca3270a3433284dd417.png

5.ActiveSetup项目右键,生成。在ActiveSetup\Express\DVD-5\DiskImages\DISK1文件夹下有如下文件:

0818b9ca8b590ca3270a3433284dd417.png

四、使用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" /qn3.在同目录下创建一个批处理文件

build.bat

"cabarc.exe" n test.cab ActiveXSetup.msi install.inf4.双击

build.bat ,会自动生成一个test.cab。

五、添加到网页中测试

1.解决方案ActiveXDemo右键-->添加新项目-->Visual C#-->web-->ASP.NET Web窗体应用程序

0818b9ca8b590ca3270a3433284dd417.png

0818b9ca8b590ca3270a3433284dd417.png

2.WebApplication1项目右键-->添加新项-->Visual C#-->web-->Web窗体

0818b9ca8b590ca3270a3433284dd417.png

3.打开WebForm1.aspx,在

codebase="/test.cab">

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值