<script type=text/javascript教程 src=http://fw.qq.com/ipaddress></script>
<script type=text/javascript>
var hehe1=IPData[2]
var hehe2=IPData[3]
alert(hehe1);
alert(hehe2);
document.write(IPData.join(' '));
</script>

如何用ASP來存儲，從上面讀取出來的數(shù)據(jù)呢。
回答：
復(fù)制代碼 代碼如下:
<%
function GetResStr(URL,code)
err.clear
dim Http,ReturnStr
Set Http=server.createobject("Microsoft.XMLHTTP")
Http.open "GET",URL,False
Http.Send()
If Http.Readystate =4 Then
If Http.status=200 Then
ReturnStr=BytesToBstr(http.responseBody,code)
GetResStr=ReturnStr
End If
End If
End Function
'函數(shù)名:BytesToBstr
'作用:轉(zhuǎn)換二進制數(shù)據(jù)為字符
'參數(shù):Body-二進制數(shù)據(jù),Cset-文本編碼方式
Function BytesToBstr(Body,Cset)
Dim Objstream
Set Objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position

ASP 獲取騰訊IP地址的接口程序代碼