LOGO OA教程 ERP教程 模切知识交流 PMS教程 CRM教程 开发文档 其他文档  
 
网站管理员

asp中如何通过ajax获取远端服务器上指定页面的数据

admin
2024年3月28日 10:15 本文热度 585
:asp中如何通过ajax获取远端服务器上指定页面的数据


下面以asp从ip138网站中获取IP地址为例说明:

Function getAddr(from_IP)

getAddr="未知地址"

if from_IP &"CS"<>"CS" then

dim objXML,getAddrTmp

set objXML=createobject("MSXML2.XMLHTTP")

objXML.open "post","https://www.ip138.com/iplookup.asp?action=2&ip="& from_IP,false

objXML.send()

If objXML.readystate<>4 then

exit function

End If

getAddrTmp=BytesToBstr(objXML.responseBody)

if instr(getAddrTmp,"本站数据:")>0 and instr(getAddrTmp,"</li>")>0 then getAddr=left(split(split(getAddrTmp,"本站数据:")(1),"</li>")(0),50)

set objXML=nothing

if err.number<>0 then err.Clear

end if

End Function


Function BytesToBstr(body)

dim objstream

set objstream = CreateObject("adodb.stream")

objstream.Type = 1

objstream.Mode =3

objstream.Open

objstream.Write body

objstream.Position = 0

objstream.Type = 2

objstream.Charset = "GB2312"  '编码方式 

BytesToBstr = objstream.ReadText

objstream.Close

set objstream = nothing

end Function


temp_ip="156.2.36.96"

response.write (getAddr(temp_ip))


该文章在 2024/3/28 10:17:46 编辑过
关键字查询
相关文章
正在查询...
点晴ERP是一款针对中小制造业的专业生产管理软件系统,系统成熟度和易用性得到了国内大量中小企业的青睐。
点晴PMS码头管理系统主要针对港口码头集装箱与散货日常运作、调度、堆场、车队、财务费用、相关报表等业务管理,结合码头的业务特点,围绕调度、堆场作业而开发的。集技术的先进性、管理的有效性于一体,是物流码头及其他港口类企业的高效ERP管理信息系统。
点晴WMS仓储管理系统提供了货物产品管理,销售管理,采购管理,仓储管理,仓库管理,保质期管理,货位管理,库位管理,生产管理,WMS管理系统,标签打印,条形码,二维码管理,批号管理软件。
点晴免费OA是一款软件和通用服务都免费,不限功能、不限时间、不限用户的免费OA协同办公管理系统。
Copyright 2010-2024 ClickSun All Rights Reserved