iP Address QueryHTTPS（1000 free requests）
Get the location of iP and network operator
Applications used：7
Product services support payments in USD, HKD, and USDT
Interface address
HTTP protocol:
http://api.youripapi.com/ipdata/
HTTPS protocol:
https://api.youripapi.com/ipdata/
* The API interface may be blocked due to various network reasons and attacks. Please make redundancy and exception handling during development
*If the status code returned by the HTTP request is not 200, perform an exception. For example, the status code 202 May be caused by invalid Token, insufficient balance, or incorrect format
iP query interface example for ASP:
Method 1.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% Option Explicit
'=========================================================
' File : .asp
' Version : 1.0.0.0
' Create :
' Modify :
'=========================================================
' 1.0.0.0 :
'========================================================= %>
<% Dim ip,datatype,token,url
ip = "117.25.13.123"
datatype = "txt"
token = "00d5cb1fac5dc5cbfe2ff218292a2dfd33" 'User Center View your token
url = "https://api.youripapi.com/ip/?ip="&ip&"&datatype="&datatype&"&token="&token
Response.Write (GetURL(url))
Function GetURL(url)
on error resume next
dim Retrieval
Set Retrieval = Server.CreateObject("MSXML2.ServerXMLHTTP")
Retrieval.setTimeouts 600000, 600000, 600000, 600000
Retrieval.Open "GET", url, false
Retrieval.Send
GetURL = Retrieval.ResponseBody
Set Retrieval = Nothing
GetURL=BytesToBstr(GetURL,"utf-8")
End Function
Function BytesToBstr(strBody,CodeBase)
dim objStream
set objStream = Server.CreateObject("Adodb.Stream")
objStream.Type = 1
objStream.Mode =3
objStream.Open
objStream.Write strBody
objStream.Position = 0
objStream.Type = 2
objStream.Charset = CodeBase
BytesToBstr = objStream.ReadText
objStream.Close
set objStream = nothing
End Function
%>
Method 2.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% Option Explicit
'=========================================================
' File : .asp
' Version : 1.0.0.0
' Create :
' Modify :
'=========================================================
' 1.0.0.0 :
'========================================================= %>
<% Dim ip,datatype,token,url,strMid,oid,sign
ip = "117.25.13.123"
strMid = 777 'User Center View your mid
oid = 777 'User Center View your oid
datatype = "txt"
token = "00d5cb1fac5dc5cbfe2ff218292a2dfd33" 'User Center View your token
url = "https://api.youripapi.com/ip/?"
sign = MD5_32("ip="&ip&"&token="&token)
%>
<script type="text/javascript">
</script>
<script type="text/javascript" src="<%= url&"ip="&ip&"&callback=find&mid="&strMid&"&oid="&oid&"&sign="&sign %>"></script>