请问怎么把这个功能写程序批量查询的

yhaixj

批量查询.e (702.37 KB, 下载次数: 4)

2020-2-11 11:29 上传

点击文件名下载附件

如何写成批量查询的。有没有大佬能写一下代码，学习。

TiKiMIx

鱼刺多线程了解一下

大司命

批量查询.e (79.52 KB, 下载次数: 11)

2020-2-11 11:41 上传

点击文件名下载附件

分割文本即可~

sunsir

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
内容	文本型
源码	文本型
分割后域名	文本型
i	整数型

分割后域名 ＝ 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 ＝ “”
计次循环首 (取数组成员数 (分割后域名), i)
源码 ＝ 网页_访问S (“https://www.123cha.com/ip/?q=” ＋ 分割后域名 [i], , , , , , , , , , , , , , , , , , , , )
内容 ＝ 文本_取出中间文本 (源码, #前, #后, , )
编辑框2.加入文本 (内容 ＋ #换行符 )
计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 内容, 文本型<br /> .局部变量 源码, 文本型<br /> .局部变量 分割后域名, 文本型<br /> .局部变量 i, 整数型<br /> <br /> 分割后域名 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> 编辑框2.内容 ＝ “”<br /> .计次循环首 (取数组成员数 (分割后域名), i)<br />     源码 ＝ 网页_访问S (“https://www.123cha.com/ip/?q=” ＋ 分割后域名 <i>, , , , , , , , , , , , , , , , , , , , )<br />     内容 ＝ 文本_取出中间文本 (源码, #前, #后, , )<br />     编辑框2.加入文本 (内容 ＋ #换行符)<br /> .计次循环尾 ()

sishein

多线程,循环就好了

mcscm

.版本 2

.子程序 _按钮2_被单击
.局部变量 内容, 文本型
.局部变量 源码, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 a, 整数型

数组 ＝ 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (数组), a)
    源码 ＝ 到文本 (网页_访问_对象 (“https://www.123cha.com/ip/?q=” ＋ 数组 [a], , , , , , , , , , , , , , , , , , ))
    源码 ＝ 编码_utf8到gb2312 (源码)
    内容 ＝ 文本_取出中间文本 (源码, “=>”, “</td></tr>”, , )
    编辑框2.加入文本 (内容 ＋ #换行符)

.计次循环尾 ()