当前位置: 代码迷 >> PB >> pb6.5调用webservice
  详细解决方案

pb6.5调用webservice

热度:301   发布时间:2016-04-29 05:18:12.0
求助:pb6.5调用webservice
各位亲帮我看下如下代码:


oleobject MSSOAPLib1  
MSSOAPLib1 = create oleobject
string ls_ret

if MSSOAPLib1.connecttonewobject("MSSOAP.SoapClient30") <> 0 then  
  messagebox('提示','soap连接失败!')  
else
//MSSOAPLib1.ClientProperty("ServerHTTPRequest",true)  
MSSOAPLib1.ClientProperty("ServerHTTPRequest")


   MSSOAPLib1.mssoapinit("http://115.236.191.137:8082/APL-SMSService/SMSService?wsdl")

MSSOAPLib1.ConnectorProperty("Timeout",180000)

   ls_ret = MSSOAPLib1.sendSms(100,"7a3220d779b905d6",'15267481730','test',165432111)
messagebox("提示",ls_ret)
end if



执行到MSSOAPLib1.ClientProperty("ServerHTTPRequest",true) 和MSSOAPLib1.ConnectorProperty("Timeout",180000) 报错误的参数个数
执行MSSOAPLib1.sendSms(100,"7a3220d779b905d6",'15267481730','test',165432111)报错误的调用


------解决思路----------------------
可能pb6.5不支持,建议你试一下以下代码

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")
  相关解决方案