void CCopyFileDlg::OnRegisterOcx(CString StrName)
{
????//ActiveX控件的路徑及文件名?
????LPCTSTR pszOCXName = StrName;?
????//裝載ActiveX控件?
????HINSTANCE hLib = LoadLibrary(pszOCXName);?
????if (hLib < (HINSTANCE)HINSTANCE_ERROR)?
????{?
????????MessageBox("不能載入OCX文件!","結果",MB_OK);?
????????return;?
????}?
????//獲取注冊函數DllRegisterServer地址?
????FARPROC lpOCXEntryPoint;?
????lpOCXEntryPoint = GetProcAddress(hLib,_T("DllRegisterServer")); //改成DllRegisterServer可以卸載
????//調用注冊函數DllRegisterServer?
????if(lpOCXEntryPoint!=NULL)?
????{?
????????if(FAILED((*lpOCXEntryPoint)()))?
????????{?
????????????MessageBox("調用DllRegisterServer失敗！","結果",MB_OK);?
????????????FreeLibrary(hLib);?
????????????return;?
????????}?
????????else
????????{
???????????????MessageBox("注冊成功","結果",MB_OK);?
?????}
???
?}
?else?
?????MessageBox("調用DllRegisterServer失敗！","結果",MB_OK);

}