Excel如何调用JWS(Java Webservice)
来源:互联网 发布:常林cba数据 编辑:程序博客网 时间:2024/06/07 22:29
最近需要用到Excel调用JAVA Webservice,一开始用VBA调用.Net写的Webservice,例如:
Dim objSoapClient As New SoapClient
objSoapClient.ClientProperty("ServerHTTPRequest") = True
objSoapClient.mssoapinit ("http://svr-015:60/MMS/CalMetrics.asmx?WSDL")
s = objSoapClient.HelloWorld()
出现错误:WSDLReader:XML Paser failed at linenumber1,lineposition 5,reason is:Invalid xml declaration。
解决方法:放弃用SoapClient,改用"MSXML2.XMLHTTP",具体参考如下代码:
'get方式调用JWS
Set objhttp = CreateObject("MSXML2.XMLHTTP")
Set xmlDOC = CreateObject("MSXML.DOMDocument")
strWebserviceURL = "http://se.hundsun.com/axis/services/JiraService?method=getProject"
'设置参数及值
objhttp.Open "get", strWebserviceURL, False
'设置Content-type,很重要
objhttp.setRequestHeader "Content-Type", "text/xml;charset=utf-8"
objhttp.send (strWebserviceURL)
bOK = xmlDOC.Load(objhttp.responseXML)
'判断状态
If objhttp.Status = 200 Then
' xmlstr = xmlDOC.XML
ConvDatasetToRecordsetProject xmlDOC '解析XML
End If
Public Function ConvDatasetToRecordsetProject(ByVal voNL As DOMDocument)
Err.Clear
On Error GoTo ErrHandle
Application.Cursor = xlWait
Dim iXMLValueNode As IXMLDOMNode
Dim iXMLNodeList As IXMLDOMNodeList
Set iXMLNodeList = voNL.selectNodes("soapenv:Envelope/soapenv:Body/multiRef")
Dim str As String
For Each iXMLValueNode In iXMLNodeList
str = iXMLValueNode.childNodes.Item(1).Text + "/" + iXMLValueNode.childNodes.Item(0).Text
proList.AddItem str
Next
Application.Cursor = xlDefault
ExtSub:
Exit Function
ErrHandle:
Application.Cursor = xlDefault
MsgBox Err.Description, vbCritical + vbOKOnly
GoTo ExtSub
End Function
- Excel如何调用JWS(Java Webservice)
- JAX-WS(JWS):Java WebService
- AXIS调用jws发布的webservice
- webservice-jws
- jws+webservice
- java 如何调用webservice
- java WebService jws 入门学习笔记
- java自带JWS开发Webservice服务
- java如何调用webservice接口
- Java中如何调用WebService
- java.lang.NoSuchMethodError: javax.jws.WebService.portName()Ljava/lang/String
- java 用jws发布一个简单的webservice
- [Java] Webservice之即时发布JWS教程 (一)
- JWS-webservice写法
- excel调用webservice
- JAVA如何调用.NET开发的WebService
- 【webservice】Java调用WebService
- webservice系列教学(4)-如何调用webservice(pb,java)
- java集合类总结
- 短信内容分词(支持动态10~14位纯数字工作单号的签收信息,用在公司业务系统,很实用的算法)
- jQuery性能优化指南
- JIRA更改已发布的工作流
- LoadRunner 学习的起步
- Excel如何调用JWS(Java Webservice)
- 【例子】堆栈中运行程序
- [SetPropertiesRule]{Server/Service/Engine/Host/Context} Setting property...
- B树、B-树、B+树、B*树都是什么
- (转)大并发处理解决方案
- PHPer的几个水平阶段
- PHP做Web项目的优缺点
- Swap基本原理(转)
- IEEE 754 浮点数的表示精度探讨