批量生成QQ号并检测是否有效和开通临时会话工具

易语言 2020-03-08 16:02:59

批量生成QQ号并检测是否有效和开通临时会话工具

.如果 (昵称 ≠ “”)
超级列表框1.置标题 (参数, 2, “√”)
超级列表框1.置标题 (参数, 3, 昵称)
标签_有效QQ.标题 = 到文本 (到整数 (标签_有效QQ.标题) + 1)
编辑框_有效.加入文本 (QQ + #换行符)
.判断开始 (寻找文本 (编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://wpa.qq.com/msgrd?v=3&uin=” + QQ + “&site=qq&menu=yes”))), “唤起手机QQ”, , 假) ≠ -1)
超级列表框1.置标题 (参数, 4, “√”)
标签_临时会话.标题 = 到文本 (到整数 (标签_临时会话.标题) + 1)
编辑框_临时会话.加入文本 (QQ + #换行符)
.默认
超级列表框1.置标题 (参数, 4, “×”)
.判断结束

.否则
超级列表框1.置标题 (参数, 2, “×”)