通过注册表查询ocx路径

工作中需要在ocx中读取配置文件，配置文件与ocx同级存放，这时候获取运行路径来定位配置文件就不合适了（如果是一个exe，那么调用GetModuleFileName（）是个不错的选择），可以通过读取注册表可以获取ocx的注册路径，见下面代码

CString MJCommonTool::getOcxDirByReg( CString strCLSID/*="81858100-3226-4902-A733-89DB65C9F797"*/ )

{
CString strRet;
HKEY hKey=NULL;
CString strKey;
strKey.Format("CLSID\\{%s}\\InprocServer32",strCLSID);
if (RegOpenKeyEx (HKEY_CLASSES_ROOT, strKey, 0, KEY_QUERY_VALUE, &hKey)==ERROR_SUCCESS)
{
DWORD dwType = REG_SZ;
BYTE byDate[1024]={0};
DWORD dwLen=1024;
if (RegQueryValueEx(hKey,"",NULL,&dwType,byDate,&dwLen)==ERROR_SUCCESS)
{

byDate[dwLen]='\0';

strRet = byDate;

}
}
RegCloseKey(hKey);
return strRet;
}