asp调用webservice

本文介绍了一种使用VBS脚本通过调用WebService服务来获取IP地址对应地理位置的方法。具体实现包括创建HTTP对象请求指定URL并传递IP地址参数,解析返回的XML数据以提取地理位置信息。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

<%
'根据IP地址返回地理位置
dim objHTTP, xmlDOC, strWebserviceURL, strRequest, bOK, xmlStr
    Set objHTTP = Server.CreateObject("MSXML2.XMLHTTP")
    Set xmlDOC = Server.CreateObject("MSXML.DOMDocument")
    strWebserviceURL = "http://webservice.webxml.com.cn/WebServices/IpAddressSearchWebService.asmx/getCountryCityByIp"  'WebService的URL
    strRequest = "theIpAddress=127.0.0.1"  '带参数的方法调用
    objHTTP.Open "POST", strWebserviceURL, False
    objHTTP.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    objHTTP.Send(strRequest)
    bOK = xmlDOC.load(objHTTP.responseXML)
    if objHTTP.Status=200 then
      xmlStr = xmlDOC.text  'xmlDOC.text返回text格式 xmlDOC.xml返回xml文件格式
      Response.Write xmlStr
    else
      Response.Write objHTTP.Status&"<br>"
      Response.Write objHTTP.StatusText
    end if








%>
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值