辛巴:大神,求教,最后一步, Get_All_Task 这个子程序该怎么写啊?,我写出来的东西没用.
.版本 2
.支持库 iext
.子程序 Get_All_Task
.局部变量 Post_data, 文本型
.局部变量 Post_path, 文本型
.局部变量 return_data, 文本型
.局部变量 Json_Open, 类_json
.局部变量 Meter, 整数型
.局部变量 List, 整数型
Post_path ＝ “http://lixian.qq.com/handler/lixian/get_lixian_items.php”
Post_data ＝ “page=0&limit=200” ' //Page 是"页"的意思 即这是第一页 0=1 1=2以此类推
return_data ＝ 到文本 (网页_访问 (Post_path, 1, Post_data))
Json_Open.解析 (return_data)
.计次循环首 (Json_Open.成员数 (“data”), Meter)
List ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (List, 0, 到文本 (List ＋ 1))
超级列表框1.置标题 (List, 1, Json_Open.取通用属性 (“data[” ＋ 到文本 (Meter － 1) ＋ “].file_name”))
超级列表框1.置标题 (List, 2, Json_Open.取通用属性 (“data[” ＋ 到文本 (Meter － 1) ＋ “].hash”))
超级列表框1.置标题 (List, 3, Json_Open.取通用属性 (“data[” ＋ 到文本 (Meter － 1) ＋ “].mid”))
.计次循环尾 ()
