假设需求如下：底层是一个数学运算库DLL,中间是ActiveX控件（它调用底层的数学运算库DLL来完成控制层），界面层在测试时可以是一个exe程序，最后发布到IE浏览器上测试。
数学运算库DLL的开发
新建一个Win32 DLL项目，加入一个头文件MyNum.h,在其中声明所有的数学函数（为简单起见，本文只考虑加法运算），代码如下：
#ifndef MY_NUM_H
#define MY_NUM_H
int __stdcall AddNum(int,int);
#endif
请注意这里的方法声明为__stdcall，而VC++默认的是__cdecl，由于组件的语言无关性要求调用和被调双方必须在函数调用的约定上一致，因此在后面加载DLL并获取此方法时也要求和你的声明一致。
为了简单起见，加法方法的实现就放倒DLL入口点所在文件,代码如下：
复制代码
// NumDLL.cpp : 定义DLL 应用程序的入口点。
//
#include "stdafx.h"
#include "MyNum.h"
#ifdef _MANAGED
#pragma managed(push, off)
#endif
int __stdcall AddNum(int Num1,int Num2)
{
return Num1+Num2;
}
BOOL APIENTRY DllMain( HMODULE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved
)
{
return TRUE;
}
#ifdef _MANAGED
#pragma managed(pop)
#endif
复制代码
为了能在其他程序中显示链接此DLL，我们为它加入一个.def文件，命名为NumDLL.def，列出此DLL导出的方法名称：
LIBRARY "NumDLL"
EXPORTS
AddNum
至此我们的数学运算函数库DLL就完成了。
用ATL开发ActiveX控件
开发ActiveX控件有两种方式，一是MFC,二是ATL,而后者是专门用于COM组件开发，因此更适合于ActiveX。因此这里选择后者，前者的开发示例参考我这篇文章（用VC++开发ActiveX 控件完全教程（一））。
新建一个ATL项目，命名为”FuckATL”，接受默认设置。右键项目名，添加一个”ATL简单对象“，命名为CaluNumCtrl，点击下一步进入组件选项设置界面。
修改类的头文件CaluNumCtrl.h如下：
复制代码
class ATL_NO_VTABLE CCaluNumCtrl :
public CComObjectRootEx<CComSingleThreadModel>,
public CComCoClass<CCaluNumCtrl, &CLSID_CaluNumCtrl>,
public ISupportErrorInfo,
public IConnectionPointContainerImpl<CCaluNumCtrl>,
public CProxy_ICaluNumCtrlEvents<CCaluNumCtrl>,
public IObjectWithSiteImpl<CCaluNumCtrl>,
public IDispatchImpl<ICaluNumCtrl, &IID_ICaluNumCtrl, &LIBID_FuckATLLib, /*wMajor =*/ 1, /*wMinor =*/ 0>
{
public:
typedef int (__stdcall*PtrAddNum)(int,int);
PtrAddNum MyAddNum;
CCaluNumCtrl()
{
//加载数学运算库DLL
handle = ::LoadLibrary(_T("D:\\dyk\\work\\NumDLL\\debug\\NumDLL.dll"));
if (handle == NULL)
{
DWORD e = GetLastError();
return;
}
//获取加法运算函数指针
MyAddNum = (PtrAddNum)GetProcAddress(handle,"AddNum");
}
DECLARE_REGISTRY_RESOURCEID(IDR_CALUNUMCTRL)
BEGIN_COM_MAP(CCaluNumCtrl)
COM_INTERFACE_ENTRY(ICaluNumCtrl)
COM_INTERFACE_ENTRY(IDispatch)
COM_INTERFACE_ENTRY(ISupportErrorInfo)
COM_INTERFACE_ENTRY(IConnectionPointContainer)
COM_INTERFACE_ENTRY(IObjectWithSite)
END_COM_MAP()
BEGIN_CONNECTION_POINT_MAP(CCaluNumCtrl)
CONNECTION_POINT_ENTRY(__uuidof(_ICaluNumCtrlEvents))
END_CONNECTION_POINT_MAP()
// ISupportsErrorInfo
STDMETHOD(InterfaceSupportsErrorInfo)(REFIID riid);
DECLARE_PROTECT_FINAL_CONSTRUCT()
HRESULT FinalConstruct()
{
return S_OK;
}
void FinalRelease()
{
}
//组件对外放出的加法方法
public:
STDMETHOD(AddNumbers)(LONG Num1, LONG Num2, LONG* ReturnVal); //下面是一个NUM属性，也是用于测试,包含了读写设置方法
public:
STDMETHOD(get_NUM)(SHORT* pVal);
public:
STDMETHOD(put_NUM)(SHORT newVal);
public:
HMODULE handle;//数学函数库模块句柄
};
复制代码
在控件实现文件CaluNumCtrl.cpp中，代码如下：
复制代码
STDMETHODIMP CCaluNumCtrl::AddNumbers(LONG Num1, LONG Num2, LONG* ReturnVal)
{
int sum = this->MyAddNum(static_cast<int>(Num1),static_cast<int>(Num2));
*ReturnVal = static_cast<LONG>(sum);
return S_OK;
}
STDMETHODIMP CCaluNumCtrl::get_NUM(SHORT* pVal)
{
*pVal = 10;
return S_OK;
}
STDMETHODIMP CCaluNumCtrl::put_NUM(SHORT newVal)
{
// TODO: 在此添加实现代码
return S_OK;
}
复制代码
好了，ActiveX控件仅仅是简单地调用底层的数学运算库DLL来完成运算，下面我们写一个exe程序对这个COM组件进行测试。
一个控制台测试程序
建立一个最简单的控制台程序来进行测试，代码如下：
复制代码
#include "..\..\FuckATL\FuckATL\FuckATL.h"
#include "..\..\FuckATL\FuckATL\FuckATL_i.c"
#include <iostream>
using namespace std;
void main(void)
{
// Declare and HRESULT and a pointer to the Simple_ATL interface
HRESULT hr;
ICaluNumCtrl *IFirstATL = NULL;
// Now we will intilize COM
hr = CoInitialize(0);
// Use the SUCCEDED macro and see if we can get a pointer to
// the interface
if(SUCCEEDED(hr))
{
hr = CoCreateInstance( CLSID_CaluNumCtrl, NULL, CLSCTX_INPROC_SERVER,
IID_ICaluNumCtrl, (void**) &IFirstATL);
// If we succeeded then call the AddNumbers method, if it failed
// then display an appropriate message to the user.
if(SUCCEEDED(hr))
{
long ReturnValue;
hr = IFirstATL->AddNumbers(5, 7, &ReturnValue);
cout << "The answer for 5 + 7 is: " << ReturnValue << endl;
short num;
IFirstATL->get_NUM(&num);
cout<<"num is: "<<num<<endl;
hr = IFirstATL->Release();
}
else
{
cout << "CoCreateInstance Failed." << endl;
}
}
// Uninitialize COM
CoUninitialize();
system("pause");
}
复制代码
来到IE的世界
最后我们将此ActiveX组件嵌入到html页面中，对其进行测试.新建一个html页面，代码如下：
复制代码
<HTML>
<HEAD>
<TITLE>New Page</TITLE>
<script language="javascript">
function doTest()
{
var sum = FuckATL1.AddNumbers(3,4);
alert(sum);
}
</script>
</HEAD>
<BODY>
<OBJECT ID="FuckATL1" CLASSID="CLSID:7BF3B65F-A800-4604-AE6B-91844EFD5F05">
</OBJECT>
<input type="button" value="测试加法" id="btnOK" onclick="doTest();"></input>
</BODY>
</HTML>
复制代码
由于暂时先不考虑控件的安全性需要，因此会出现下面的警告信息，不过不要紧，这个问题以后再解决。
测试结果如下：
本文转自Phinecos(洞庭散人)博客园博客，原文链接：http://www.cnblogs.com/phinecos/archive/2008/07/28/1254963.html，如需转载请自行联系原作者
![【Python】 已解决：ERROR: Could not install packages due to an OSError: [WinError 5] 拒绝访问。: ‘e:\anaconda\i](https://ucc.alicdn.com/pic/developer-ecology/q2u6twjpprubc_e5624665023c4da5a98326e85f680b0c.png?x-oss-process=image/format,webp/resize,h_160,m_lfit)
