在vc中怎样调用vb做的ActiveX DLL控件
发布网友
发布时间：2022-05-06 19:56
共2个回答
热心网友
时间：2023-08-19 16:30
2、使用＃import导入服务组件，拷贝PRJADO.DLL到VC工程目录，打开STDAFX.H文件增加如下代码：
# import "prjado.dll"
using namespace prjado;
这段代码应该放置在:
//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately 之后和#endif 之前。
在stdafx.h文件导入dll能够让编译器在运行时连接dll的类型库，#import它能够自动产生一个对GUIDs的定义，同时自动生成对clsado对象的封装。同时能够列举它在类中所能找到的类型， VC++会在编译的时候自动生成两个文件:
一个头文件（.tlh）,它包含了列举的类型和对类型库中对象的定义；
一个实现文件（.tli）对类型库对象模型中的方法产生封装。
Namespace（名字空间）用来定义一个名字空间，使用unsing就可以将当前的类型上下文转换名字空间所定地，让我们可以访问服务组件的方法。
如果我们修改了服务组件程序，建议删除这两个文件后重新完整编译工程，以便让编译器重新列举类的属性以及函数。
3、在对话框中新添加一按钮，标题设为“测试”。双击“测试”按钮，系统提示新建一函数OnButton1对应于该按钮的CLICK事件。OnButton1函数的具体代码如下
HRESULT hresult;
CLSID clsid;
CoInitialize(NULL);
//初始化COM接口
hresult=CLSIDFromProgID(OLESTR("prjado.clsado"), &clsid);
//得到组件的CLSID
_clsado *t;
//这就是我们在PRJADO.DLL中定义的类
hresult=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(_clsado),(LPVOID *) &t);
初始化CLSADO，CoCreateInstance（）的第一个参数是对象的CLSID（类代码），这个128位的编码唯一地标识了组件服务，它的路径和运行参数等信息都放在系统注册表中；第二个参数一般情况下设为NULL；第三个参数用来指明对象的运行环境，如远程或本地，此处设为CLSCTX_INPROC_SERVER，标明是服务组件是一个DLL；第四个参数指明用来与对象通信接口的ID，这也是一个128位的编码；第五个参数是用来接收对象的接口指针。
if(FAILED(hresult))
{
AfxMessageBox("初始化服务组件失败");
return;
}
//如果初始化失败，弹出提示对话框后退出程序
t->ado_Init() ;
//调用初始化函数
t->ado_add("从VC调用组件") ;
//调用增加记录函数
t->ado_UnInit ();
//调用关闭连接函数
t->Release();
//释放接口指针
CoUninitialize();
// 关闭COM库的联接
AfxMessageBox("调用服务组件完成");
保存工程后编译运行VC 程序，点击“测试”按钮，等待完成提示后，我们打开数据库就可以看到刚才添加的记录了。
总结：
综上所述,在实际的应用程序开发中，利用组件技术，我们可以进行VC和VB混合编程，充分地发挥开发工具的优势，可以很好地加快软件的开发进度，并且极大的改善程序的可维护性和可用性。
热心网友
时间：2023-08-19 16:31
HRESULT hr = CoInitialize(NULL); //初始化COM
//装载ActiveX控件
HINSTANCE hLib = LoadLibrary(_T("SMtest.dll")); //替换你的DLL文件
if (hLib < (HINSTANCE)HINSTANCE_ERROR)
{
cout<<"不能载入Dll文件!"<<endl;
return FALSE;
}
//获取注册函数DllRegisterServer地址
FARPROC lpDllEntryPoint;
lpDllEntryPoint = GetProcAddress(hLib,"DllRegisterServer");
//调用注册函数DllRegisterServer
if(lpDllEntryPoint!=NULL)
{
if(FAILED((*lpDllEntryPoint)()))
{
cout<<"调用DllRegisterServer失败！\r\n如果是在Vista中运行：\r\n请右击程序，选择“以管理员身份运行”即可"<<endl;
FreeLibrary(hLib);
};
cout<<lpDllEntryPoint<<endl;
}
else
{
cout<<"调用DllRegisterServer失败！"<<endl;
}
