PB调用COM组件的问题?
velen 2006-02-09 10:08:14 在PB中调用VC++写的COM组件,代码如下:
oleobject olereadcomm
olereadcomm = create oleobject
integer li_ret
li_ret = olereadcomm.ConnectToNewObject("SRDAccessor.SRDatabase")
if li_ret = 0 then
ll_return=olereadcomm.OpenDatabase('server','system','szg')
else
//run("regsvr32 VBReadComm.dll")
//bb("error",li_ret)
end if
destroy olereadcomm
其中OpenDatabase是组件内的一个函数.
问题是执行到ConnectToNewObject这一行后,li_ret的值总返回-4,PB帮助为 Could not connect to object.该组件保证已经注册了.