记录 易语言 正则获取ip

前端之家收集整理的这篇文章主要介绍了记录 易语言 正则获取ip前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
.版本 2 .子程序 _按钮1_被单击 .局部变量 网页内容,文本型 .局部变量 i,整数型 .局部变量 采集的网址,文本型,"0" .局部变量 采集条数,长整数型 重定义数组 (ip,假,0) 采集的网址 = 分割文本 (编辑框1.内容,#换行符,) .计次循环首 (取数组成员数 (采集的网址),i) .如果真 (删全部空 (采集的网址 [i]) ≠ “”) 操作_写操作状态 (“正在获取网址[” + 到文本 (i) + “]内容”) 网页内容 = 到文本 (网页_访问 (采集的网址 [i])) .如果 (网页内容 ≠ “”) 采集条数 = 采集条数 + 正则_把采集网页整理 (网页内容) .否则 操作_写操作状态 (“获取网址[” + 到文本 (i) + “]内容 失败!”) .如果结束 .如果真结束 .计次循环尾 () ' 网页内容 = 编辑框1.内容 操作_写操作状态 (“正在采集 手动采集网页文本内容”) 采集条数 = 采集条数 + 正则_把采集网页整理 (编辑框2.内容) 操作_写操作状态 (“完成!共采集了[” + 到文本 (采集条数) + “]条IP”) .子程序 正则_把采集网页整理,整数型 .参数 网页内容,文本型 .局部变量 l_ip,ip .局部变量 正则,正则表达式类 .局部变量 采集条数,整数型 .局部变量 i,整数型 网页内容 = 正则_去除不必要标签 (网页内容) 正则.创建 (“[\s\S]*?(\d+\.\d+\.\d+\.\d+)[\s\S]*?(\d{2,4})”,网页内容) .计次循环首 (正则.取匹配数量 (),i) 采集条数 = 采集条数 + 1 l_ip.ip = 正则.取子匹配文本 (i,1) l_ip.端口 = 正则.取子匹配文本 (i,2) 加入成员 (ip,l_ip) .计次循环尾 () 返回 (采集条数) .子程序 正则_去除不必要标签,文本型 .参数 文本,文本型 .局部变量 正则,正则表达式类 .局部变量 a,整数型 .局部变量 已经替换的,"0" .局部变量 i2,整数型 正则.创建 (“<td.*?>”,文本,真,真) ' a = 正则.替换 (“a”) .计次循环首 (正则.取匹配数量 (),i) .如果真 (是否是重复替换文本 (已经替换的,正则.取匹配文本 (i)) = 假) 加入成员 (已经替换的,正则.取匹配文本 (i)) .如果真结束 .计次循环尾 () .计次循环首 (取数组成员数 (已经替换的),i) 文本 = 子文本替换 (文本,已经替换的 [i],真) .计次循环尾 () 返回 (文本) .子程序 是否是重复替换文本,逻辑型 .参数 数组,数组 .参数 判断内容,整数型 .计次循环首 (取数组成员数 (数组),i) .如果真 (数组 [i] = 判断内容) 返回 (真) .如果真结束 .计次循环尾 () 返回 (假) .子程序 规范表达式,文本型 返回 (子文本替换 (文本,#引号,“\x22”,真)) .子程序 检查ip,逻辑型 .参数 ipx,文本型 .局部变量 a,"0" a = 分割文本 (ipx,“.”,) .判断开始 (取数组成员数 (a) = 4) .如果真 (取文本长度 (a [1]) > 3 或 取文本长度 (a [2]) > 3 或 取文本长度 (a [3]) > 3 或 取文本长度 (a [4]) > 3 或 到整数 (a [1]) = 0) 返回 (假) .如果真结束 .如果真 (到整数 (a [1]) = 0) 返回 (假) .如果真结束 返回 (真) .默认 返回 (假) .判断结束 .子程序 检查端口,逻辑型 .参数 端口,文本型 .如果真 (取文本长度 (端口) > 5) 返回 (假) .如果真结束 .如果真 (到整数 (端口) = 0) 返回 (假) .如果真结束 返回 (真) 原文链接:https://www.f2er.com/regex/362696.html

猜你在找的正则表达式相关文章