程式中註冊ActiveX組件

typedef HRESULT (WINAPI * FREG)();<br />TCHAR szWorkPath[ MAX_PATH ];<br />::GetCurrentDirectory( sizeof(szWorkPath), szWorkPath );// 儲存當前進程的工作目錄<br />::SetCurrentDirectory( 組件目錄 );// 切換到組件的目錄<br />HMODULE hDLL = ::LoadLibrary( 組件檔案名稱 );// 動態裝載組件<br />if(hDLL)<br />{<br /> // 取得註冊函數指標<br />FREG lpfunc = (FREG)::GetProcAddress( hDLL, _T("DllRegisterServer") );<br />// 如果是反註冊，可以取得"DllUnregisterServer"函數指標<br />if ( lpfunc )lpfunc();// 執行註冊。這裡為了簡單，沒有判斷傳回值<br />::FreeLibrary(hDLL);<br />}<br />::SetCurrentDirectory(szWorkPath);// 切換回原先的進程工作目錄<br />