精易论坛

标题: 检查导入的文本是否是IP地址 [打印本页]

---

作者: 低头前进    时间: 2024-10-30 23:00
标题: 检查导入的文本是否是IP地址
易友们，我是新学易语言的新手，最近在编写工具时遇到一点问题，望广大易友们解答，就是如何检测导入的文本是否是IP地址，我有想过通过二次分割文本的方法，将192.168.1.1的IP段分成192，168，1，1，这样四个文本段进行逐一判断，但如果我有几千个这样的IP地址呢，这样的判断方法就显得很低效了，有没有更高效的判断方法呢？

.版本 2.子程序 文本_是否为IP, 逻辑型, , 返回真为IP文本，返回假不是IP.参数 文本, 文本型.局部变量 正则, 正则表达式类正则.创建 (“[\d]{1,3}”, 文本, , , , ).如果真 (正则.取匹配数量 () ＝ 4)    返回 (真).如果真结束

子程序名	返回值类型	公开	备 注
文本_是否为IP	逻辑型		返回真为IP文本，返回假不是IP
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
正则	正则表达式类

正则.创建 (“[\d]{1,3}”, 文本, , , , )
如果真 (正则.取匹配数量 () ＝ 4)
返回 (真)
返回

  

子程序名返回值类型公开备 注
文本_是否为IP逻辑型 注释：返回真为IP文本，返回假不是IP
参数名类 型参考可空数组备 注
文本文本型
变量名类 型静态数组备 注
正则正则表达式类
正则.创建 (“[\d]{1,3}”, 文本, , , , )
如果真 (正则.取匹配数量 () ＝ 4)
返回 (真)
返回 (假)

子程序名        返回值类型        公开        备 注<br /> 文本_是否为IP        逻辑型 注释：返回真为IP文本，返回假不是IP<br /> 参数名        类 型        参考        可空        数组        备 注<br /> 文本        文本型                                <br /> 变量名        类 型        静态        数组        备 注<br /> 正则        正则表达式类                         <br /> 正则.创建 (“[\d]{1,3}”, 文本, , , , )<br /> 如果真 (正则.取匹配数量 () ＝ 4)<br /> 返回 (真)<br /> 返回 (假)

我有看了易语言助手上的这则正则判断式，但是插进软件里面提示找不到正则表达式，而且我看了核心支持库，正则.创建（）这条命令没有那么多的参数，就三个参数，参数一是正则文本，参数二是正则模式，参数三是支持转义符，

恳请神通广大的易友们支支招了。

---

作者: LEOONL    时间: 2024-10-30 23:00

低头前进 发表于 2024-10-30 23:28
比如说我有几千个IP，全部存放在一个txt文本里，我通过通用文件框导入进来，然后我想判断这一整个txt文本 ...

  

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

调试输出 (判断格式 (“1.2.3.4” ＋ #换行符 ＋ “5.6.7.8”))
调试输出 (判断格式 (“1.2.3.4” ＋ #换行符 ＋ “5.6.7.8.9”))

子程序名	返回值类型	公开	备 注
判断格式	逻辑型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
数组	文本型		0
正则	正则表达式类

数组 ＝ 分割文本 (文本, #换行符, )
正则.创建 (“^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$”, 文本, , 真)
如果 (正则.取匹配数量 () ＝ 取数组成员数 (数组))
返回 (真)
返回 (假)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 调试输出 (判断格式 (“1.2.3.4” ＋ #换行符 ＋ “5.6.7.8”))<br /> 调试输出 (判断格式 (“1.2.3.4” ＋ #换行符 ＋ “5.6.7.8.9”))<br /> <br /> .子程序 判断格式, 逻辑型<br /> .参数 文本, 文本型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 正则, 正则表达式类<br /> <br /> 数组 ＝ 分割文本 (文本, #换行符, )<br /> 正则.创建 (“^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$”, 文本, , 真)<br /> .如果 (正则.取匹配数量 () ＝ 取数组成员数 (数组))<br />     返回 (真)<br /> .否则<br />     返回 (假)<br /> .如果结束

---

作者: LEOONL    时间: 2024-10-30 23:06

  

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

调试输出 (是否为IP (“12.12.32.32”))
调试输出 (是否为IP (“12.12.32.323.32”))

子程序名	返回值类型	公开	备 注
是否为IP	逻辑型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
正则	正则表达式类

正则.创建 (“^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$”, 文本)
如果 (正则.取匹配数量 () ＞ 0)
返回 (真)
返回 (假)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 调试输出 (是否为IP (“12.12.32.32”))<br /> 调试输出 (是否为IP (“12.12.32.323.32”))<br /> <br /> .子程序 是否为IP, 逻辑型<br /> .参数 文本, 文本型<br /> .局部变量 正则, 正则表达式类<br /> <br /> 正则.创建 (“^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$”, 文本)<br /> .如果 (正则.取匹配数量 () ＞ 0)<br />     返回 (真)<br /> .否则<br />     返回 (假)<br /> .如果结束

---

作者: sbx5o4    时间: 2024-10-30 23:06
\d{1,3}.\d{1,3}.\d{1,3}.\d{1,3}

---

作者: 低头前进    时间: 2024-10-30 23:21

LEOONL 发表于 2024-10-30 23:06
[e=0].版本 2
.支持库 spec

感谢你的回答，可能是我表达的不够清晰，我是想判断导入的TXT文档是否是IP地址，我这文本里可能放了几千个IP，相当于一个文本数组了，也是用你这条命令去计次循环判断么？如果是，就继续执行下一条命令，不是的话就弹出信息框呢

---

作者: haoren1212    时间: 2024-10-30 23:21
有个组件叫IP编辑框

---

作者: LEOONL    时间: 2024-10-30 23:25

低头前进 发表于 2024-10-30 23:21
感谢你的回答，可能是我表达的不够清晰，我是想判断导入的TXT文档是否是IP地址，我这文本里可能放了几千 ...

所以你要判断啥，挨个判断取出符合的，还是判断整个文本是不是正确格式，如果不是抛弃整个文本

---

作者: 低头前进    时间: 2024-10-30 23:26

haoren1212 发表于 2024-10-30 23:21
有个组件叫IP编辑框

谢谢你的回答，我想像导入文本那样，导入一个IP的txt文本来的，然后再判断这个文件是否都是合法的IP地址呢

---

作者: 低头前进    时间: 2024-10-30 23:28

LEOONL 发表于 2024-10-30 23:25
所以你要判断啥，挨个判断取出符合的，还是判断整个文本是不是正确格式，如果不是抛弃整个文本 ...

比如说我有几千个IP，全部存放在一个txt文本里，我通过通用文件框导入进来，然后我想判断这一整个txt文本是否是正确的IP格式，如果不是就提示格式不对呢

---

作者: 低头前进    时间: 2024-10-30 23:29

LEOONL 发表于 2024-10-30 23:25
所以你要判断啥，挨个判断取出符合的，还是判断整个文本是不是正确格式，如果不是抛弃整个文本 ...

.版本 2
.支持库 iext

通用对话框1.类型 ＝ 0
通用对话框1.打开 ()
IP文本 ＝ 到文本 (读入文件 (通用对话框1.文件名))
IP文本数组 ＝ 分割文本 (IP文本, #换行符, )
.计次循环首 (取数组成员数 (IP文本数组), 局_计次)
    .判断开始 (文本_是否为IP (IP文本数组 [取数组成员数 (IP文本数组)]) ＝ 真)
        索引 ＝ 超级列表框1.插入表项 (, , , , , )
        超级列表框1.置标题 (索引, 3, IP文本数组 [局_计次])

    .默认

    .判断结束

.计次循环尾 ()

信息框 (“请导入正确的IP地址”, 0, , )

---

作者: haoren1212    时间: 2024-10-30 23:30

低头前进 发表于 2024-10-30 23:21
感谢你的回答，可能是我表达的不够清晰，我是想判断导入的TXT文档是否是IP地址，我这文本里可能放了几千 ...

建议直接文本分割，几千个IP首先你应该分割这几千个后计次循环进行判断，单个ip再次分割判断是否数组数是否等于四且分割出来的单字段是否大于255小于0

---

作者: 低头前进    时间: 2024-10-30 23:56

LEOONL 发表于 2024-10-30 23:32
[e=0].版本 2
.支持库 spec

我去，真牛，厉害，我马上测试下

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4