-
乌龟快饿死了
发布于 2012-05-18 01:51
-
收藏
复制代码 代码如下:''getIP set http=createobject("Microsoft.XMLHTTP") ipp="http:https://www.ip138.com/ip2city.asp" http.open "get",ipp,false http.send ss=bytes2BSTR(Http.responsebody) intStrA = InStr(1,ss,"[",1)+1 sss=mid(ss,intStr..