从PB8.0/9.0开始,就已经提供Web Service Proxy功能,能够直接进行相关程序的编写。
但是,部分老项目使用PB6.5开发
研究后发现,其实PB6.5要操作Web Service也挺容易。
说明:1.本例子用于pb对Web Service的操作。
2.pb可使用两种方式实现。
3.proxy方式使用pb9自带的Web Service Proxy功能实现,需要将sharedPowerBuilderpbsoapclient90.pbd包含到应用中来。
4.OLE方式调用MSSOAP.SoapClient实现,此方式可用于低版本pb,如pb6.5。
5.MSSOAPLib.SoapClient的获得,请从microsoft搜索soap toolkit下载soapsdk.exe
OLEObject MSSOAPLib1
MSSOAPLib1= CREATE OLEObject
long ll_result
ll_result = MSSOAPLib1.ConnectToNewObject("MSSOAP.SoapClient")
if ll_result <> 0 then
messagebox("系统提示","连接MSSOAP.SoapClient失败!返回参数:"+string(ll_result))
end if
MSSOAPLib1.mssoapinit("http://172.17.99.20:9090/yygh/services/Query?wsdl")
mle_content.Text = MSSOAPLib1.sendXml("Sina", sle_userid.text, sle_passwd.text, sle_mobileno.text, mle_content.text, "new")