各位亲帮我看下如下代码:
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")