|
发表于 2013-2-12 20:50:45
|
显示全部楼层
福建省南平市
这个是可以用的源码,既可以取中间又可以批量。
[e]
.版本 2
.子程序 取中间文本, 文本型
.参数 完整内容, 文本型
.参数 左边文本, 文本型
.参数 右边文本, 文本型
.参数 循环读取, 逻辑型, 可空
.参数 结果数组, 文本型, 可空 数组
.局部变量 总长度, 整数型
.局部变量 临时文本, 文本型
.局部变量 位置1, 整数型
.局部变量 位置2, 整数型
总长度 = 取文本长度 (完整内容)
.如果 (循环读取 = 真)
重定义数组 (结果数组, 假, 0)
位置1 = 寻找文本 (完整内容, 左边文本, , 真)
.判断循环首 (位置1 ≠ -1)
位置2 = 寻找文本 (完整内容, 右边文本, 位置1 + 1, 真)
加入成员 (结果数组, 取文本中间 (完整内容, 位置1 + 取文本长度 (左边文本), 位置2 - 位置1 - 取文本长度 (左边文本)))
位置1 = 寻找文本 (完整内容, 左边文本, 位置2 + 1, 真)
.判断循环尾 ()
.如果 (取数组成员数 (结果数组) > 1)
返回 (结果数组 [1])
.否则
返回 (“”)
.如果结束
.否则
.如果 (寻找文本 (完整内容, 左边文本, , 假) > -1 且 寻找文本 (完整内容, 右边文本, , 假) > -1)
位置2 = 寻找文本 (完整内容, 左边文本, , 假) + 取文本长度 (左边文本)
临时文本 = 取文本中间 (完整内容, 位置2, 总长度)
总长度 = 取文本长度 (临时文本)
位置2 = 寻找文本 (临时文本, 右边文本, , 假) - 1
临时文本 = 取文本中间 (临时文本, 1, 位置2)
返回 (临时文本)
.否则
返回 (“”)
.如果结束
.如果结束
[/e] |
|