编写在浏览器中不弹出警告的ActiveX控件

我们在编写ActiveX控件时，如果用在浏览器中，经常都会弹出现在运行的脚本不安全的提示， 如果给客户使用，将会带来极大不便。按照MSDN的介绍通常有两种一种是实现IObjectSafe接口，一种是通过修改注册表的方法。一般如果用ATL开发ActiveX控件，就用实现ObjectSafe接口的方法。如果用MFC开发，我觉得还是用修改注册表的方法比较方便。下面我们将第二种方法：

要包括两个文件

1.#include "comcat.h"

2.#include "Objsafe.h"

// 本控件的CLSID,注册表用

1.const GUID CDECL CLSID_SafeItem =

2.{ 0x7AE7497B, 0xCAD8, 0x4E66, { 0xA5,0x8B,0xDD,0xE9,0xBC,0xAF,0x6B,0x61 } };

// 创建组件种类

01.HRESULT CreateComponentCategory(CATID catid, WCHAR* catDescription)

02.{

03.ICatRegister* pcr = NULL ;

04.HRESULT hr = S_OK ;

05. 

06.hr = CoCreateInstance(CLSID_StdComponentCategoriesMgr,

07.NULL, CLSCTX_INPROC_SERVER, IID_ICatRegister, (void**)&pcr);

08.if (FAILED(hr))

09.return hr;

10. 

11.// Make sure the HKCR\Component Categories\{..catid...}

12.// key is registered.

13.CATEGORYINFO catinfo;

14.catinfo.catid = catid;

15.catinfo.lcid = 0x0409 ; // english

16. 

17.// Make sure the provided description is not too long.

18.// Only copy the first 127 characters if it is.

19.int len = wcslen(catDescription);

20.if (len>127)

21.len = 127;

22.wcsncpy(catinfo.szDescription, catDescription, len);

23.// Make sure the description is null terminated.

24.catinfo.szDescription[len] = ''\0'';

25. 

26.hr = pcr->RegisterCategories(1, &catinfo);

27.pcr->Release();

28. 

29.return hr;

30.}

// 注册组件种类

01.HRESULT RegisterCLSIDInCategory(REFCLSID clsid, CATID catid)

02.{

03.// Register your component categories information.

04.ICatRegister* pcr = NULL ;

05.HRESULT hr = S_OK ;

06.hr = CoCreateInstance(CLSID_StdComponentCategoriesMgr,

07.NULL, CLSCTX_INPROC_SERVER, IID_ICatRegister, (void**)&pcr);

08.if (SUCCEEDED(hr))

09.{

10.// Register this category as being "implemented" by the class.

11.CATID rgcatid[1] ;

12.rgcatid[0] = catid;

13.hr = pcr->RegisterClassImplCategories(clsid, 1, rgcatid);

14.}

15.if (pcr != NULL)

16.pcr->Release();

17.return hr;

18.}

// 卸载组件种类

01.HRESULT UnRegisterCLSIDInCategory(REFCLSID clsid, CATID catid)

02.{

03.ICatRegister* pcr = NULL ;

04.HRESULT hr = S_OK ;

05. 

06.hr = CoCreateInstance(CLSID_StdComponentCategoriesMgr,

07.NULL, CLSCTX_INPROC_SERVER, IID_ICatRegister, (void**)&pcr);

08.if (SUCCEEDED(hr))

09.{

10.// Unregister this category as being "implemented" by the class.

11.CATID rgcatid[1] ;

12.rgcatid[0] = catid;

13.hr = pcr->UnRegisterClassImplCategories(clsid, 1, rgcatid);

14.}

15. 

16.if (pcr != NULL)

17.pcr->Release();

18. 

19.return hr;

20.}

// DllRegisterServer - Adds entries to the system registry

01.STDAPI DllRegisterServer(void)

02.{

03.HRESULT hr;

04. 

05.AFX_MANAGE_STATE(_afxModuleAddrThis);

06. 

07.if (!AfxOleRegisterTypeLib(AfxGetInstanceHandle(), _tlid))

08.return ResultFromScode(SELFREG_E_TYPELIB);

09. 

10.if (!COleObjectFactoryEx::UpdateRegistryAll(TRUE))

11.return ResultFromScode(SELFREG_E_CLASS);

12. 

13.// 标记控件初始化安全.

14.// 创建初始化安全组件种类

15.hr = CreateComponentCategory(CATID_SafeForInitializing, L"Controls safely initializable from persistent data!");

16.if (FAILED(hr))

17.return hr;

18.// 注册初始化安全

19.hr = RegisterCLSIDInCategory(CLSID_SafeItem, CATID_SafeForInitializing);

20.if (FAILED(hr))

21.return hr;

22. 

23.// 标记控件脚本安全

24.// 创建脚本安全组件种类

25.hr = CreateComponentCategory(CATID_SafeForScripting, L"Controls safely scriptable!");

26.if (FAILED(hr))

27.return hr;

28.// 注册脚本安全组件种类

29.hr = RegisterCLSIDInCategory(CLSID_SafeItem, CATID_SafeForScripting);

30.if (FAILED(hr))

31.return hr;

32. 

33.return NOERROR;

34.}

// DllUnregisterServer - Removes entries from the system registry

view source

print?

01.STDAPI DllUnregisterServer(void)

02.{

03.HRESULT hr;

04. 

05.AFX_MANAGE_STATE(_afxModuleAddrThis);

06. 

07.if (!AfxOleUnregisterTypeLib(_tlid, _wVerMajor, _wVerMinor))

08.return ResultFromScode(SELFREG_E_TYPELIB);

09. 

10.if (!COleObjectFactoryEx::UpdateRegistryAll(FALSE))

11.return ResultFromScode(SELFREG_E_CLASS);

12. 

13.// 删除控件初始化安全入口.

14.hr=UnRegisterCLSIDInCategory(CLSID_SafeItem, CATID_SafeForInitializing);

15.if (FAILED(hr))

16.return hr;

17.// 删除控件脚本安全入口

18.hr=UnRegisterCLSIDInCategory(CLSID_SafeItem, CATID_SafeForScripting);

19.if (FAILED(hr))

20.return hr;

21. 

22.//////////////////////////

23.return NOERROR;

24.}

(全文完)

from:http://www.vckbase.com/index.php/wv/526