|
12楼
发表于 2018-10-28 01:00:41
|
只看该作者
安徽省合肥市
例子来了,跟个项目工作原理很像,作了个删减操作,主要操作部分跟你描述的很像
- .版本 2
- .支持库 spec
- .支持库 mysql
- .子程序 例子程序
- .参数 时间, 整数型
- .局部变量 sql, 文本型
- .局部变量 正则, 正则表达式类
- .局部变量 i, 整数型
- .局部变量 手机号, 文本型
- .局部变量 内容, 文本型
- .局部变量 验证码, 文本型
- .局部变量 时间1, 文本型
- .局部变量 加, 文本型
- .局部变量 表达式, 正则表达式类
- .局部变量 sql1, 文本型
- .判断循环首 (时钟线程ID ≠ 0)
- 这次读取的文本 = 到文本 (读入文件 (目录)) ' 时钟周期运行了,代表过了一秒了,从新读一次txt的内容
- 多出来的文本 = 子文本替换 (这次读取的文本, 上次读取的文本, “”, , , 真)
- 多出来的文本 = 取文本右边 (多出来的文本, 取文本长度 (多出来的文本) - 2)
- .判断开始 (多出来的文本 ≠ “”)
- 正则.创建 (#正则, 多出来的文本, , , , )
- .计次循环首 (正则.取匹配数量 (), i)
- 标准输出 (, 内容)
- 手机号 = 正则.取子匹配文本 (i, 2, )
- 时间1 = 正则.取子匹配文本 (i, 3, )
- 内容 = 正则.取子匹配文本 (i, 5, )
- 标准输出 (, 内容)
- 表达式.创建 (“([0-9]{1,})”, 内容, , , , )
- 调试输出 (表达式.取匹配数量 ())
- 验证码 = 表达式.取子匹配文本 (1, 1, )
- sql = “insert into table_duanxin(mobile,time,note,status) values('” + 手机号 + “','” + 时间1 + “','” + 到文本 (编码_Ansi到Utf8 (内容)) + “','” + 验证码 + “')”
- 调试输出 (sql)
- 标准输出 (, #换行符)
- 标准输出 (, sql + #换行符 + #换行符)
- .判断开始 (执行SQL语句 (mysql1, sql) = 真)
- 标准输出 (, “发送成功 ” + #换行符)
- .默认
- 标准输出 (, “发送失败 ” + #换行符)
- .判断结束
- .计次循环尾 ()
- .默认
- .判断结束
- 上次读取的文本 = 这次读取的文本
- Sleep (时间)
- .判断循环尾 ()
复制代码 |
|