易语言 批量替换文本指定内容后的数字

有一批批量文本文件,里面都有一句: *软荐啦 9 。其中所在行数不确定,数字“9”不确定,每个文件里不一样。需要批量处理,把每个文件里的这一行: *软荐啦 9 里的数字按我填写的倍数相乘,并将结果写回到文件原位置。
写了好久程序,总是发现不成功。哪怕只是先按上面的要求尝试着替换单个文件也不行。求高手指点。最好有源码提供学习!

文本文件:
bind "0" "slot10"bind "1" "slot1"bind "2" "slot2"bind "3" "slot3"bind "4" "slot4"*软荐啦 9
bind "5" "slot5"bind "6" "slot6"bind "7" "slot7"bind "8" "slot8"bind "9" "slot9"

写的程序码:
.版本 2
.程序集 窗口程序集1.程序集变量 要写入的内容, 整数型
.子程序 _按钮1_被单击.局部变量 配置文件内容, 文本型.局部变量 文件内容数组, 文本型, , "0".局部变量 n, 整数型.局部变量 要写入的内容, 文本型.局部变量 文件号, 整数型.局部变量 寻找位置, 整数型.局部变量 文本, 文本型
配置文件内容 = 到文本 (读入文件 (取运行目录 () + “\1.cfg”))文件内容数组 = 分割文本 (配置文件内容, #换行符, ).计次循环首 (取数组成员数 (文件内容数组), n) .如果真 (取文本左边 (文件内容数组 [n], 7) = “*软荐啦”) 要写入的内容 = 取文本右边 (文件内容数组 [n], 取文本长度 (文件内容数组 [n]) - 7) 跳出循环 () .如果真结束
.计次循环尾 ()编辑框1.内容 = 要写入的内容编辑框3.内容 = 到文本 (到数值 (编辑框1.内容) × 到数值 (编辑框2.内容))
.如果真 (写到文件 (取运行目录 () + “\456.ini”, 到字节集 (编辑框3.内容)) = 真) ' 编辑框1.内容 = 要写入的内容 信息框 (“写入成功!”, 0, ).如果真结束
.子程序 _按钮2_被单击.局部变量 文件号, 整数型.局部变量 寻找位置, 整数型.局部变量 文本, 文本型
文件号 = 打开文件 (取运行目录 () + “\1.cfg”, #读写, ).如果真 (编辑框3.内容 ≠ “” 且 文件号 ≠ 0) 文本 = 读入文本 (文件号, ) 寻找位置 = 寻找文本 (文本, “*软荐啦”, , 假) + 1 移动读写位置 (文件号, , 寻找位置) 删除数据 (文件号, 寻找文本 (文本, “*软荐啦”, 寻找位置 + 1, 假) + 8) 移动读写位置 (文件号, , 寻找位置) 插入文本 (文件号, 编辑框3.内容) 关闭文件 (文件号).如果真结束

我倒是可以帮你,但我要知道(*软荐啦       9)这句中间是用空格分开的,还是用TAB分开的。只有知道这个才能做出来,我测试了你的文本内容,它们中间是用了7个空格分开的。

那么,我就以空格分开的方式,给你做了下面的示例:

 

附件老是上传失败,无法上传源码给你

 

 

追问

非常感谢指点。单个文件替换的问题已经解决。
不过还有点问题,因为这个文件夹里有255个文件,我想想批量一次性修改。不知道在上面程序的基础上该怎么修改才能得到实现?

追答

你最好能把,这个文件夹包括里面的文件发给我,我才好根据各文件的实际情况分析写出代码。
我可以加你Q Q 帮你做

追问

我把文件打包放云盘了,麻烦高手帮我看下
http://pan.baidu.com/s/1mgojqlU

非常感谢朋友的帮助 !我把文件打包放百度盘了:http://pan.baidu.com/s/1qWNna1m 请帮忙解决下问题!谢谢
其他问题:文件夹里需要修改的文件名不同, 替换处空格也有部分不一样,发现

追答

文件传给你了,里面有我写好的工具。

 

知道我是谁了吧,呵呵,我就是鱼哥^_^

追问

感谢鱼哥的大力支持!方便的话能提供下源码文件吗?或者源码贴图也行。想好好学习下,刚开始学易语言,想多借鉴下。有不少的问题网上找不到答案的,能看到源码才能搞懂问题^_^。

追答

源码给你了,你自己研究吧,呵呵。

打开时,可能提示缺少皮肤模块,无所谓,直接忽略即可,与其它代码没有关系

温馨提示:内容为网友见解,仅供参考
无其他回答
相似回答