易语言调用whois实现域名批量查询与注册的代码

时间:2021-05-19

域名批量查询注册与whois查询的代码

此功能需要加载精易模块5.6

.版本 2.支持库 EThread.程序集 窗口程序集_启动窗口.子程序 _批量查询_被单击启动线程 (&查询是否可以注册, , ).子程序 查询是否可以注册.局部变量 xml, 文本型.局部变量 域名数组, 文本型, , "0".局部变量 计次, 整数型批量查询.禁止 = 真批量查询.标题 = “正在查询...”域名数组 = 分割文本 (删首尾空 (批量域名.内容), #换行符, )结果.内容 = “”可以注册.内容 = “”.计次循环首 (取数组成员数 (域名数组), 计次) xml = 到文本 (网页_访问 (“http://panda./” + 域名.内容, , , , , , , , , )))html = 文本_取出中间文本 (源码, “</em></li>”, “</ul>”, , )whois结果.内容 = “”正则.创建 (“<span>(.*?)</span>(.*?)<”, html, , , , ).计次循环首 (正则.取匹配数量 (), 计次) text = text + 正则.取子匹配文本 (计次, 1, ) + “:” + 正则.取子匹配文本 (计次, 2, ) + #换行符 处理事件 ().计次循环尾 ()whois结果.内容 = text查询原始whois (源码).子程序 查询原始whois.参数 源码, 文本型.局部变量 正则, 正则表达式类.局部变量 计次, 整数型.局部变量 text, 文本型.局部变量 html, 文本型html = 文本_取出中间文本 (源码, “whoisInfo” + #引号 + “>”, “</div>”, , )正则.创建 (“(.*?)<br />”, 子文本替换 (html, “ ”, “”, , , 真), , , , ).计次循环首 (正则.取匹配数量 (), 计次) text = text + 正则.取子匹配文本 (计次, 1, ) + #换行符 处理事件 ().计次循环尾 ()whois原始内容.内容 = text

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对的支持。如果你想了解更多相关内容请查看下面相关链接

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章