.版本 2.常量 查ip地址, "<文本長度: 17>", , {"code":0,"data":

.版本 2.程序集 窗口程序集_啟動(dòng)窗口.子程序 取IP歸屬地_百度API, 文本型, 公開.參數(shù) IP地址, 文本型.局部變量 Json, 類_json.局部變量 返回?cái)?shù)據(jù), 文本型.局部變量 地區(qū), 文本型CoInitialize (0)返回?cái)?shù)據(jù) ＝ 到文本 (網(wǎng)頁_訪問_對象 (“http://opendata.baidu.com/api.php?query=” ＋ IP地址 ＋ “&co=&resource_id=6006&t=” ＋ 時(shí)間_取現(xiàn)行時(shí)間戳 () ＋ “&ie=utf8&oe=gbk&cb=op_aladdin_callback&format=json&tn=baidu&cb=jQuery1102026811896078288555_1412299994977&_=1412299994981”, 0, , , , , , , , , , , , , , ))返回?cái)?shù)據(jù) ＝ 文本_取出中間文本 (返回?cái)?shù)據(jù), “[”, “]”)返回?cái)?shù)據(jù) ＝ #查ip地址 ＋ 返回?cái)?shù)據(jù) ＋ “}”Json.解析 (返回?cái)?shù)據(jù))地區(qū) ＝ Json.取通用屬性 (“data.location”)返回 (地區(qū)).子程序 _獲取歸屬地按鈕_被單擊歸屬地編輯框.內(nèi)容 ＝ 取IP歸屬地_百度API (到文本 (IP地址編輯框.內(nèi)容))