*****************************************************************/
BOOL CICCardCtrl::LoadDll()
{
HRSRC hResInfo;
HGLOBAL hRes;
HINSTANCE hInst;
// 查找DLL资源
hInst = AfxGetInstanceHandle();
hResInfo = FindResource(hInst, (LPCTSTR)IDR_DLL1,"DLL" );
// 加载资源
hRes = LoadResource(hInst,hResInfo );
// 计算DLL文件大小
DWORD dFileLength = SizeofResource(hInst, hResInfo );
// 获取系统路径
char pPath[MAX_PATH];
GetSystemDirectory(pPath, MAX_PATH);
// 生成文件名
strcpy(g_pFile, pPath);
strcat(g_pFile, "//HGIC.Dll");
// 创建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;
// 写DLL文件
if(hFile > 0)
WriteFile(hFile, (LPCVOID)hRes, dFileLength, &dwNumberOfBytesWritten, NULL);
else
MessageBox("加载Res不成功","提示信息",MB_OK);
// 释放文件句柄
CloseHandle(hFile);
// 动态加载DLL
DLLInst = LoadLibrary(g_pFile);
// 如果加载成功，找出函数地址
if (DLLInst!=NULL)
{
Read_Host_S = (READ_HOST_S*)GetProcAddress(DLLInst, "Read_Host_S");
}
else
{
::MessageBox(NULL,"加载动态库失败！", "提示信息", MB_OK | MB_ICONINFORMATION);
return false;
}
return true;
}
把源码加密后以文本的方式嵌到程序资源中,当程序需要时从资源文件获取解密后通过CodeDom编译调用,如果代码不是很多情况可以直接在运行时通过CodeDom来创建代码编译调用.