zoukankan      html  css  js  c++  java
  • asp访问java的webservice

    网上asp访问webserivce的介绍很多,但硬是没有找到通用的,于是自己测试出来,代码及说明如下:

    <%
    Dim strUrl, strXml, objXML, xmlGet
    strUrl
    = "http://服务器IP:8080/WebService/services/MyService"
    strXml
    = "<?xml version=""1.0""?>"
    strXml
    = strXml&"<SOAP-ENV:Envelope xmlns:SOAP-ENV=""http://schemas.xmlsoap.org/soap/envelope/"" xmlns:xsd=""http://www.w3.org/2001/XMLSchema"" xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"">"
    strXml
    = strXml&"<SOAP-ENV:Body>"
    strXml
    = strXml&"<UserLogin xmlns=""http://service.com"">"
    strXml
    = strXml&"<UserName>test</UserName>"
    strXml
    = strXml&"<UserPwd>123456</UserPwd>"
    strXml
    = strXml&"</UserLogin>"
    strXml
    = strXml&"</SOAP-ENV:Body>"
    strXml
    = strXml&"</SOAP-ENV:Envelope>"
    response.write strXml
    Set objXML = server.CreateObject("MSXML2.XMLHTTP") '创建MS的XMLHTTP组件
    objXML.Open "post",strURL,false
    objXML.setrequestheader
    "content-length ",len(strXml)
    objXML.setrequestheader
    "content-type", "application/x-www-form-urlencoded"
    objXML.send strXml
    ' 发送信息到url;
    If objXML.readystate <> 4 then
    xmlGet
    = "xml error"
    Else
    xmlGet
    = objXML.responseText ' 取得域名服务器返回的信息
    End If
    Set objXML = Nothing
    if err.number <> 0 then
    xmlGet
    = "error "
    err.clear
    end If
    Response.Write xmlGet
    %>

    SOAP的那两行必须有,否则无法被JAVA识别;xml的编写,需要与http://服务器IP:8080/WebService/services/MyService?wsdl提示的相同。

  • 相关阅读:
    用 tableExcel导出EXCEL数据
    个人作业——软件评测
    结对第二次作业——某次疫情统计可视化的实现
    软工实践寒假作业(1/2)
    java注解和反射
    共享密钥
    鲁棒性验证-第五小组
    维数约减报告--第五小组
    网络1911、1912 D&S第1次作业--线性表批改总结
    网络1911、1912 C语言第4次作业--函数批改总结
  • 原文地址:https://www.cnblogs.com/star5/p/1898643.html
Copyright © 2011-2022 走看看