读取配置文件功能

1.从配置文件加载url地址,实现url可动态配置

读取配置文件直接调用易语言"读配置项"函数非常方便,比如将配置文件放在c:\CoolQ\conf\conf.ini中,配置文件内容如下:

[serverip]

url=http://192.168.1.19:8888/api_qq/getmessage.php?msg_content=

想从url中动态获得目标网站地址,代码如下:

diao_url = 读配置项 (CQ.取应用目录 () + “....\conf\conf.ini”, “serverip”, “url”, )

发送HTTP请求

本模块主要使用http GET请求,非常简单,代码如下:

返回内容 = 到文本 (网页_访问 (url))

如需要使用POST请求,参考https://bbs.125.la/thread-13746926-1-1.html

易语言操作JSON

json是目前主要的数据传输格式,本模块也是使用json作为数据传输格式,但易语言解析json不同版本存在差异,主要参考 https://bbs.125.la/thread-13949150-1-4.html json生成和解析方法

需要将该链接中的 类_json代码 完全拷贝到自己的模块中,演示代码如下:

解析json

json.解析 (返回内容)

fromGroup = 到长整数 (json.取通用属性 (“qqqun”))

生成json

message 类_json类型

message.清除 ()

message.置属性 (“msg_content”, “”)

message.置属性 (“msg_qqqum”, 到文本 (fromGroup))

message.置属性 (“msg_qq”, 到文本 (fromQQ))

message.置属性 (“type”, “orqq”)

message.置属性 (“msg_type”, 到文本 (subtype))

message.置属性 (“msg_robot_qq”, 到文本 (robot_qq))

message.置属性 (“msg_sub_type”, 到文本 (subtype))

message.置属性 (“msg_beidong_qq”, 到文本 (beingOperateQQ))

嵌套json格式操作

.版本 2

    text = Api_GetGroupMemberList (IRC_机器人QQ, 到文本 (fromGroup))
    temp.解析 (text)
    count = 到长整数 (temp.取通用属性 (“count”))
    .如果 (寻找文本 (Api_GetGroupAdmin (IRC_机器人QQ, 到文本 (fromGroup)), IRC_机器人QQ, , 假) > -1)
        ' Api_OutPutLog (“test here”)

        .计次循环首 (temp.成员数 (“mems”), i)

            ' i = i - 1
            startTime = 到长整数 (temp.取通用属性 (“mems[” + 到文本 (i) + “].last_speak_time”))

            .如果真 (到长整数 (temp.取通用属性 (“mems[” + 到文本 (i) + “].role”)) = 2)

                ' Api_OutPutLog (temp.取通用属性 (“mems[” + 到文本 (i) + “].uin”))
                .如果真 (startTime < sec)

                    fromQQ = fromQQ + 1
                    qqlist = qqlist + 到文本 (temp.取通用属性 (“mems[” + 到文本 (i) + “].uin”)) + “^”


                .如果真结束
                .如果真 (取文本长度 (nick) > 0 且 (寻找文本 (temp.取通用属性 (“mems[” + 到文本 (i) + “].nick”), nick, , 假) > -1 或 寻找文本 (temp.取通用属性 (“mems[” + 到文本 (i) + “].card”), nick, , 假) > -1))

                    fromQQ = fromQQ + 1
                    qqlist = qqlist + 到文本 (temp.取通用属性 (“mems[” + 到文本 (i) + “].uin”)) + “^”

                .如果真结束
                .如果真 (到长整数 (temp.取通用属性 (“mems[” + 到文本 (i) + “].qage”)) < qage)

                    fromQQ = fromQQ + 1
                    qqlist = qqlist + 到文本 (temp.取通用属性 (“mems[” + 到文本 (i) + “].uin”)) + “^”


                .如果真结束


            .如果真结束

        .计次循环尾 ()
        ' 机器人是管理员

易语言json解析

https://bbs.125.la/thread-13949150-1-4.html

https://www.jianshu.com/p/b6e657afba58

results matching ""

    No results matching ""