|
发表于 2024-9-16 17:29:11
|
显示全部楼层
重庆市重庆市
.版本 2
.支持库 shell
.程序集 窗口程序集_1
.子程序 _按钮1_被单击
.局部变量 目录路径, 文档路径, 文件名, 文本内容, 新文本内容, 文件流, 行内容
.局部变量 文件夹, 文件列表, 文件总数, 当前行, 替换内容
目录路径 = “C:\你的目录路径” // 修改为你实际的目录路径
替换内容 = “chk3=1$3$5$7$9$” // 需要替换的内容
文件夹 = Shell.获取文件夹列表 (目录路径)
文件总数 = 文件夹.文件总数
对于 当前行 = 1 到 文件总数
文件名 = 文件夹.取文件名 (当前行)
如果 (文件名.右边文本 (4) = “.ini”)
文档路径 = 目录路径 + “\” + 文件名
文件流 = 文件.打开 (文档路径, 文件.读写, 文件.文本)
如果 (文件流 = 0)
继续
文件内容 = 文件.读出所有 (文件流)
文件.关闭 (文件流)
行内容 = “”
新文本内容 = “”
.局部变量 行号, 行文本
行号 = 1
遍历每行 (文件内容, 行文本)
如果 (行文本.查找 (“chk3=”))
行内容 = 替换内容
否则
行内容 = 行文本
新文本内容 = 新文本内容 + 行内容 + “\r\n”
结束
文件流 = 文件.打开 (文档路径, 文件.写入, 文件.文本)
如果 (文件流 = 0)
继续
文件.写入 (文件流, 新文本内容)
文件.关闭 (文件流)
结束
结束
消息 (“处理完成”, “提示”, 0)
.子程序 遍历每行 (文本内容, 变量 行内容)
.局部变量 行开始, 行结束
行开始 = 1
行结束 = 文本内容.查找 (换行符, 行开始)
当 (行结束 > 0)
行内容 = 文本内容.取文本 (行开始, 行结束 - 行开始)
行开始 = 行结束 + 2
行结束 = 文本内容.查找 (换行符, 行开始)
结束
行内容 = 文本内容.取文本 (行开始, 文本内容.取长度 () - 行开始 + 1)
|
|