精易模块文本批量取中间有BUG

流痕

.版本 2
.支持库 spec

源码 ＝ 网页_取网页源码 (“www.wushan.gov.cn”)
整数变量 ＝ 文本_取中间_批量 (源码, “http://”, “</a>”, 临时数组, 假, 40)


执行此命令后闪退   有时候会提示分配内存失败

猜想：是不是有取到的个数限制？    附上该网页源码   在编辑框中也是一样

铭香

解决了吗

铅笔刀

使用精益模块3.12  

萧阳天

Hoibben 发表于 2014-12-15 01:16
这个也有问题 建议直接去除这个命令吧 直接正则可好~

这是在原有的嵌套子程序上改为循环处理，解决了程序奔溃和分配内存失败的问题，不过这寻找的方式太吃CPU这也是无法解决。

Hoibben

萧阳天 发表于 2014-12-15 01:03
这是改进版本，

这个也有问题 建议直接去除这个命令吧 直接正则可好~

萧阳天

这是改进版本，

1. .版本 2
   
2. 
   
3. .子程序 文本_取中间_批量2_, 整数型, 公开, 比如：欲取全文本为<12345>,现在要取出“3”，<3>的前面为“2”，<3>的后面为“4”
   
4. .参数 源文本, 文本型, , 比如：欲取全文本为 12345
   
5. .参数 前面标识文本, 文本型, , 3的前面为“2”
   
6. .参数 后面标识文本, 文本型, , 3的后面为“4”
   
7. .参数 存放取出文本的数组, 文本型, 可空 数组, 存放取出文本的数组
   
8. .参数 是否区分大小写, 逻辑型, 可空, 是否区分大小写
   
9. .参数 文本长度大于此数的不要, 整数型, 可空, 文本长度大于此数的不要;如取出的文本大于50的不要;留空为不限制
   
10. .参数 为取出的文本加上前缀, 文本型, 可空, 在取出的文本前面加上一段字符或汉字！可空！
    
11. .参数 为取出的文本加上后缀, 文本型, 可空, 在取出的文本后面加上一段字符或汉字！可空！
    
12. .参数 连前面标识文本一起取出, 逻辑型, 可空, 是否连<前面标识文本>一起取出? 默认为假，不取出！
    
13. .参数 连后面标识文本一起取出, 逻辑型, 可空, 是否连<后面标识文本>一起取出? 默认为假，不取出！
    
14. .参数 起始搜寻位置, 整数型, 可空, 注明：位置值从 1 开始。如果本参数被省略，默认为 1 。
    
15. .局部变量 Search, 文本型
    
16. .局部变量 StartPos, 整数型
    
17. .局部变量 EndPos, 整数型
    
18. 
    
19. 清除数组 (存放取出文本的数组)
    
20. StartPos ＝ 寻找文本 (源文本, 前面标识文本, 起始搜寻位置, 是否区分大小写)
    
21. .判断循环首 (StartPos ≠ -1)
    
22.     StartPos ＝ 寻找文本 (源文本, 前面标识文本, StartPos, 是否区分大小写)
    
23.     .如果真 (StartPos ≠ -1)
    
24.         EndPos ＝ 寻找文本 (源文本, 后面标识文本, StartPos ＋ 取文本长度 (前面标识文本), 是否区分大小写)
    
25.         .如果真 (EndPos ≠ -1)
    
26.             StartPos ＝ StartPos ＋ 取文本长度 (前面标识文本)
    
27.             Search ＝ 删首尾空 (取文本中间 (源文本, StartPos, EndPos － StartPos))
    
28.             .如果真 (取文本长度 (Search) ＞ 0)
    
29.                 .如果真 (连前面标识文本一起取出)
    
30.                     Search ＝ 前面标识文本 ＋ Search
    
31.                 .如果真结束
    
32.                 .如果真 (连后面标识文本一起取出)
    
33.                     Search ＝ Search ＋ 后面标识文本
    
34.                 .如果真结束
    
35.                 .如果 (文本长度大于此数的不要 ≠ 0)
    
36.                     .如果真 (取文本长度 (Search) ＜ 文本长度大于此数的不要)
    
37.                         加入成员 (存放取出文本的数组, Search)
    
38.                     .如果真结束
    
39. 
    
40.                 .否则
    
41.                     加入成员 (存放取出文本的数组, Search)
    
42.                 .如果结束
    
43.                 StartPos ＝ EndPos
    
44.             .如果真结束
    
45. 
    
46.         .如果真结束
    
47. 
    
48.     .如果真结束
    
49.     处理事件 ()
    
50. .判断循环尾 ()
    
51. 返回 (取数组成员数 (存放取出文本的数组))
    

复制代码

Hoibben

这个命令本来就是个鸡肋 少数据的还好 大数据的请用正则方式 如 文本_取中间_批量_正则方式()

依然是海洋

没看懂，不过我用的是取批量