在ActiveX控件中如何动态调用DLL函数之"准"一体化方法


基本思路:

1、把DLL做为资源加入到ActiveX中。

2、在网页加载ActiveX时,先提取出资源,临时存在系统目录中(可能还有更好的方法,但我现在还没有找到)。
3、在用动态调用动态库的方法加载临时生成的动态库。

4、调用动态库中的函数。

5、当退出网页时,删除临时动态库。

其思路简单,但不知这样方法的用处大不大。因我不是做WEB方面开发的。

现在对关键地方进行少量说明:

提取资源内容生成临时文件:

HGLOBAL hRes;
HRSRC hResInfo;
//寻找EXE资源名
hResInfo = ::FindResource(g_hInstance,(LPCSTR)IDR_DLL1,"DLL");
hRes = ::LoadResource(g_hInstance,hResInfo ); // Load it
DWORD dFileLength = ::SizeofResource(g_hInstance, hResInfo );
//创建DLL文件
char pPath[MAX_PATH];
GetSystemDirectory(pPath, MAX_PATH);

strcpy(g_pFile, pPath);
strcat(g_pFile, "//ExpDll1.Dll");
HANDLE hFile = CreateFile(g_pFile, GENERIC_WRITE | GENERIC_READ,
FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL);
DWORD dwNumberOfBytesWritten = 0;
if(hFile > 0)
WriteFile(hFile, (LPCVOID)hRes, dFileLength, &dwNumberOfBytesWritten, NULL);
else
MessageBox("加载Res不成功","提示信息",MB_OK);
CloseHandle(hFile);


导入临时生成的DLL函数:

hDll = ::LoadLibrary(g_pFile);
if(hDll != NULL)
fun = (void(__stdcall *)(void))(GetProcAddress(hDll, "ExpShowMsg"));
else
MessageBox("加载DLL不成功","提示信息",MB_OK);

释放DLL并删除临时DLL文件:

//释放DLL
::FreeLibrary(hDll);
//删除DLL文件
::DeleteFile(g_pFile);

 

就这么容易。如果还有不清的地方,老兄你就看源程序吧!如果老兄有方法去掉那个“准”字,请给我说一下方法。在下在这里先谢了。

注:源程序中一个目录是Active源程序,另一个是DLL源程序。要注册控件后方可运行.

环境:VC6 + Win2000+FrontPage2000
优质内容筛选与推荐>>
1、Spring Boot的启动器Starter详解
2、jQuery.extend 函数详解
3、tcpdump
4、课程管理系统
5、VS下Qt设计师文件的使用


长按二维码向我转账

受苹果公司新规定影响,微信 iOS 版的赞赏功能被关闭,可通过二维码转账支持公众号。

    阅读
    好看
    已推荐到看一看
    你的朋友可以在“发现”-“看一看”看到你认为好看的文章。
    已取消,“好看”想法已同步删除
    已推荐到看一看 和朋友分享想法
    最多200字,当前共 发送

    已发送

    朋友将在看一看看到

    确定
    分享你的想法...
    取消

    分享想法到看一看

    确定
    最多200字,当前共

    发送中

    网络异常,请稍后重试

    微信扫一扫
    关注该公众号