线程_初始化COM库 ()按钮3.禁止 = 真
局_网址 =
“http://192.168.2.1”局_方式 = 1
编辑框1每行内容 =
分割文本 (编辑框1.内容,
#换行符, )编辑框2每行内容 =
分割文本 (编辑框2.内容,
#换行符, )
计次循环首 (取数组成员数 (编辑框1每行内容
), i
)
isim = 编辑框1每行内容
[i
]
计次循环首 (取数组成员数 (编辑框2每行内容
), j
)

mima = 编辑框2每行内容
[j
]





ADD_数据包.
添加 (“name”, isim
)

ADD_数据包.
添加 (“pass”, mima
)

局_提交数据 = ADD_数据包.
获取Post数据 ()

ADD_协yi头.
添加 (“User-Agent”,
“Mozilla/5.0 (Windows NT 6.1; WOW64; rv:46.0) Gecko/20100101 Firefox/46.0”)

局_提交协yi头 = ADD_协yi头.
获取协yi头数据 ()

局_结果 =
网页_访问_对象 (局_网址, 局_方式, 局_提交数据, , , 局_提交协yi头, , , , , , , , , , ,
)

局_返回 =
到文本 (编码_编码转换对象 (局_结果
))



json.
解析 (局_返回
)

code = json.
取属性 (“code”).
取数据文本 ()

如果真 (code =
“200”)


索引 = 超级列表框1.
插入表项 (,
到文本 (i + j
), , , ,
)


name = json.
取通用属性 (“name”)


pass = json.
取通用属性 (“pass”)


超级列表框1.
置标题 (索引, 1, name
)


超级列表框1.
置标题 (索引, 2, pass
)

如果真 (code =
“100”)


索引 = 超级列表框1.
插入表项 (,
到文本 (索引
), , , ,
)


name = json.
取通用属性 (“name”)


pass = json.
取通用属性 (“pass”)


超级列表框1.
置标题 (索引, 1, name
)


超级列表框1.
置标题 (索引, 2, pass
)
超级列表框1.**显示 ()
计次循环尾 ()
计次循环尾 ()按钮3.禁止 = 假
线程_取消COM库 ()