利用RegSvr32来注册.NET COM组件
背景
前一段时间由于业务关系须要在一个比较旧的系统编写一个补丁。原系统使用VB编程但如果要使用VB来实现这个补丁的内容对于我这个并不怎么接触VB的人来说太头痛了。由于平时使用的是C#来开发于是便想到能否用编写.NETCOM组件的方式来让VB调用。想到这两三下便写了个.NETCOM测试组件用VB测试调用测试OK。接下来就是进行后续的开发可等到开发完成后到了补丁打包环节却傻眼了。原来的补丁打包工具在诞生时还不知道.NET为何物所以根本没有使用RegAsm来注册.NET COM组件的功能。现在更改打补丁工具那是不现实的可要使得VB调用.NET COM又必须使用RegAsm注册这下怎么办呢
解决方式
原打包工具是支持使用Reg Svr32来注册Co m组件的忽然想到能否使用Reg Svr32来注册.N ETCOM组件呢印象中regsvr32在注册DLL的时候会有个Cal lBack函数的于是赶紧Google找找相关资料最终解决了这个问题。主要原理是写一个代理的dl l 在这个DLL的注册响应函数Dl lRegisterServer里调用RegAsm来注册.NET COM 同理在Dl lUnregisterServer里反注册。
代理DLL代码stdafx.h
#pragma once
#include <windows.h>
#include <tchar.h>
Reg iste r.cpp
/*----------------------------------------------
此组件主要解决C#编写的COM组件无法用RegSvr32注册的问题
原理是增加一个代理DLL在代理DLL注册时 响应DllRegisterServer注册函数
在响应函数中使用RegAsm来注册.Net Com组件反注册同理。
----------------------------------------------*/
#include "stdafx.h"
#define MAX_PATH 260
//全局变量存放注册代理dll路劲
TCHAR g_FilePath[MAX_PATH] ;
BOOL APIENTRY DllMain( HMODULE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved
)
{
//记录代理DLL的路径主要是为了方便后面获取代理DLL所在目录
GetModuleFileName(hModule, g_FilePath, 255) ;
switch (ul_reason_for_call)
{case DLL_PROCESS_ATTACH:case DLL_THREAD_ATTACH:case DLL_THREAD_DETACH:case DLL_PROCESS_DETACH:break;
}return TRUE;
}
//注册响应函数extern "C" _declspec(dllexport) long DllRegisterServer(void)
{return Register(TRUE) ;
}
//反注册响应函数extern "C" _declspec(dllexport) long DllUnregisterServer(void)
{return Register(FALSE) ;
}
//注册组件
//install : TRUE for install, FALSE for unstall
BOOL Register(BOOL install) {
TCHAR cmd[MAX_PATH] ;
PROCESS_INFORMATION processInfo;
STARTUPINFO stInfo;
//获取注册命令
GetCmdLine(cmd, install) ;
ZeroMemory( &processInfo, sizeof(processInfo) ) ;
ZeroMemory( &stInfo, sizeof(stInfo) ) ;stInfo.cb = sizeof(stInfo) ;
BOOL ret;
//创建注册进程ret =
CreateProcess(NULL,cmd,NULL,NULL,FALSE,CREATE_NO_WINDOW,NULL,NULL,&stInfo,&processInfo) ;if(ret==TRUE) {
CloseHandle(processInfo.hProcess) ;
CloseHandle(processInfo.hThread) ;return TRUE;
}else{
//DWORD error = GetLastError() ;return FALSE;
}return FALSE;
}
//获取注册命令加/s开关可以免除确认步骤。
//注册 RegAsm.exe /s Test.dll
//反注册 RegAsm.exe /s /u Test.dllvoid GetCmdLine(LPTSTR cmd, BOOL install) {
TCHAR regAsmPath[MAX_PATH] ;
TCHAR regDl lPath[MAX_PATH] ;
TCHAR temp[10] ;regAsmPath[0] = ' \0' ;regDllPath[0] = ' \0' ;temp[0] = ' \0' ;
GetRegAsmPath(regAsmPath) ; //获取RegAsm.exe程序绝对路径
GetRegDllPath(regDllPath) ; //获取需要注册的.NET COM组件绝对路径if(install) {lstrcpy(temp, _T(" /s ") ) ;
}else{lstrcpy(temp, _T(" /s /u ") ) ;
}cmd[0] = ' \0' ;lstrcat(cmd, regAsmPath) ;lstrcat(cmd, temp) ;lstrcat(cmd, regDllPath) ;
}
//获取需要注册.Net Com组件路径此处写死为Test.dll与代理dll在同一个目录//后期可以改成读取ini配置文件void GetRegDllPath(LPTSTR path) {int count = 0;for(int i=0; i < MAX_PATH; i++) {if(g_FilePath[i] == _T('\\' ) ) {count = i + 2;
}
}
TCHAR temp[MAX_PATH] ;lstrcpyn(temp, g_FilePath, count) ; //代理DLL所在目录lstrcat (path, _T("\"") ) ;lstrcat (path, temp) ;lstrcat (path, _T("Test.dll\"") ) ;
}
//获取.NET COM注册程序RegAsm. exe的路径
//方法读取[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\.NETFramework\Instal lRoot]的值//然后拼接上"v2.0.50727\RegAsm. exe"void GetRegAsmPath(LPTSTR path) {
HKEY hKey;
DWORD dwBufLen = MAX_PATH;
LONG lRet;lRet = RegOpenKeyEx(HKEY_LOCAL_MACHINE,_T("SOFTWARE\\Microsoft\\.NETFramework") ,0,KEY_READ, &hKey) ;lRet = RegQueryValueEx(hKey, _T("InstallRoot") , NULL, NULL, (LPBYTE)path, &dwBufLen) ;RegCloseKey(hKey) ;lstrcat(path, _T("v2.0. 50727\\RegAsm.exe") ) ;
}
无忧云怎么样?无忧云值不值得购买?无忧云,无忧云是一家成立于2017年的老牌商家旗下的服务器销售品牌,现由深圳市云上无忧网络科技有限公司运营,是正规持证IDC/ISP/IRCS商家,主要销售国内、中国香港、国外服务器产品,线路有腾讯云国外线路、自营香港CN2线路等,都是中国大陆直连线路,非常适合免备案建站业务需求和各种负载较高的项目,同时国内服务器也有多个BGP以及高防节点。目前,四川雅安机房,4...
春节期间我们很多朋友都在忙着吃好喝好,当然有时候也会偶然的上网看看。对于我们站长用户来说,基本上需要等到初八之后才会开工,现在有空就看看是否有商家的促销。这里看到来自HMBcloud半月湾服务商有提供两款春节机房方案的VPS主机88折促销活动,分别是来自洛杉矶CN2 GIA和日本CN2的方案。八八折优惠码:CNY-GIA第一、洛杉矶CN2 GIA美国原生IP地址、72小时退款保障、三网回程CN2 ...
妮妮云的来历妮妮云是 789 陈总 张总 三方共同投资建立的网站 本着“良心 便宜 稳定”的初衷 为小白用户避免被坑妮妮云的市场定位妮妮云主要代理市场稳定速度的云服务器产品,避免新手购买云服务器的时候众多商家不知道如何选择,妮妮云就帮你选择好了产品,无需承担购买风险,不用担心出现被跑路 被诈骗的情况。妮妮云的售后保证妮妮云退款 通过于合作商的友好协商,云服务器提供2天内全额退款,超过2天不退款 物...