今天我们根据微信官方文档的顺序，来尝试获取微信服务器的IP地址和回调IP地址。

主要用到的类依然是我们之前编写的3个类，accesstoken类，josn类和jsonarray类。

演示代码：

CLEAR 
SET CLASSLIB TO myclass addi
*!* 检查全局对象变量otoken是否已经被创建，对公众号的所有操作都要用到这个
IF VARTYPE(otoken)!="O" OR VARTYPE(otoken)="U"
    PUBLIC otoken
    otoken=NEWOBJECT([accesstoken])
    otoken.apply()
ENDIF 
    
oxmlhttp=CREATEOBJECT("microsoft.xmlhttp")
ojson=NEWOBJECT("json")
*!* 微信服务器回调ip地址
*!* oxmlhttp.open("POST","https://api.weixin./cgi-bin/getcallbackip?")

*!* 微信服务器ip地址
oxmlhttp.open("POST","https://api.weixin./cgi-bin/get_api_domain_ip?")
*!*

oxmlhttp.send("access_token="+otoken.access_token)
WAIT "正在从服务器返回数据......" WINDOW AT 20,100 TIMEOUT 3
ojson.parse(oxmlhttp.responsetext)
IF oxmlhttp.status=200
    ? "Ip地址如下："+CHR(13)
    oarray=ojson.item(1)
    FOR i=1 to oarray.count
        ?oarray.item(i)
    ENDFOR     
ELSE 
    MESSAGEBOX("ErrorCode: "+ojson.item(1)+CHR(13);
                "ErrorMessage: "+ojson.item(2))         
ENDIF 

由于每次我们和微信公众号的互动的流程都一样，所以下一篇我打算写一个通用类，用来从服务器获得数据或错误代码，先构思一下。。。

学习啦，谢谢！