请教一个pb6.5调用webservice的问题,头疼

时间:2022-02-07 05:53:44
对方提供了一个java开发的webservice前置机,我用delphi等其他工具都可以调用,但是pb6.5用mssoap,
在初始化的时候总是出错,提示找不到外部函数
代码如下:
OLEObject MSSOAPLib
long ll_result
any la_result
string msg,ls_content

MSSOAPLib = Create OLEObject
ll_result = MSSOAPLib.ConnectToNewObject("MSSOAP.SoapClient30") //为了兼容
If ll_result <> 0 Then
ll_result = MSSOAPLib.ConnectToNewObject("MSSOAP.SoapClient")
If ll_result <> 0 Then
MessageBox("系统提示","连接MSSOAP.SoapClient失败!返回参数:"+String(ll_result))
Destroy MSSOAPLib;
End If
else
MessageBox("系统提示","连接MSSOAP.SoapClient成功!")
End If

MSSOAPLib.ClientProperty("ServerHTTPRequest",true) 
la_result = MSSOAPLib.mssoapinit("http://192.168.20.8:8089/web/services/FrontEndService")
//la_result = MSSOAPLib.mssoapinit("D:\MyProjects\数据上传系统\dsjk.wsdl")

msg = MSSOAPLib.testService()
MessageBox("系统提示","状态:"+msg)

如果mssoapinit直接绑定url会出错,提示“error calling external object function mssoapinit...,”如果mssoapinit是绑定wsdl文件,则不会出错,但是在调用函数testService时会出错,提示“error calling external object function testService...,”。是不是没有初始化成功?

困惑很久了,请前辈指点,多谢多谢·

6 个解决方案

#1


建议用高版本的pb。

#2


该回复于2012-05-24 08:48:35被版主删除

#3


系统是用6.5开发的,要升级碰到很多问题就放弃了··有没有大虾有解决办法?感激

#4


顶起来,有没有碰到过这个问题的同学帮忙看看 

#5


用delphi可以调用成功,就用delphi写一个dll, dll调用webservice,pb调用dll,不要去纠结了

#6


用9.0吧,不要用6.5

#1


建议用高版本的pb。

#2


该回复于2012-05-24 08:48:35被版主删除

#3


系统是用6.5开发的,要升级碰到很多问题就放弃了··有没有大虾有解决办法?感激

#4


顶起来,有没有碰到过这个问题的同学帮忙看看 

#5


用delphi可以调用成功,就用delphi写一个dll, dll调用webservice,pb调用dll,不要去纠结了

#6


用9.0吧,不要用6.5