关于pb设计dcom的问题,急救!
我刚开始学习pb设计DCOM,在下面这段程序中ConnectToNewRemoteObject的返回值总返回-3:3 Object could not be created
在多台计算机上实验都是如此,哪位大侠帮忙解决一下,昨天的问题我已经找到原因,发现98下不通过,到2000下可通过
OLEObject EmpObj
Integer li_rc
EmpObj = CREATE OLEObject
li_rc = EmpObj.ConnectToNewRemoteObject("server","PB70.n_com_server7")
IF li_rc < 0 THEN
DESTROY EmpObj
MessageBox("Connecting to COM Object Failed","Error: " + String(li_rc))
Return
END IF
if li_rc=0 then
Long units, time
Double avg, ld_retn
String ls_retn
string name
integer li_sum
ld_retn = EmpObj.of_sum()
messagebox("",ld_retn)
messagebox("","连接成功")
EmpObj.DisconnectObject()
end if