編寫在瀏覽器中不彈出警告的ActiveX控件
睿豐德科技 專注RFID識別技術和條碼識別技術與管理軟件的集成項目。質量追溯系統、MES系統、金蝶與條碼系統對接、用友與條碼系統對接
我們在編寫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
RFID管理系統集成商 RFID中間件 條碼系統中間層 物聯網軟件集成