如何进行批量文本替换

如明境

想写一个京东转链程序，怎么把链接批量转链并且替换掉，最后得到一个转链好的整体文本，我尝试的方法只能替换成5组分开文本

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
京链接组	文本型		0
链接数	整数型
i	整数型
京链接	文本型
替换链接	文本型
京东口令	文本型
json	类_json
京_调用返回	文本型
京链位置	整数型
msg1	文本型
AppKey	文本型
AppSecret	文本型

链接数 ＝ 文本_分割文本 (到文本 (读入文件 (“C:\京东链接.txt”)), “https://u.jd”, , 京链接组)
' 分割成数组
AppKey ＝ “*********”
AppSecret ＝ “****************************”
计次循环首 (链接数, i)
判断 (寻找文本 (京链接组 [i], “.com”, , 假) ≠ -1)
京链接 ＝ “https://u.jd” ＋ 京链接组 [i]
替换链接 ＝ 取文本中间 (京链接, 1, 24)
' 取出替换链接
' https://u.jd.com/VtaILyj?
' https://u.jd.com/VdaQBg9?
' https://u.jd.com/VCaGGwI?
' https://u.jd.com/VCaLhrI
京_调用返回 ＝ 大淘客.调用 (“https://openapi.dataoke.com/api/dels/jd/kit/promotion-union-convert”, “v1.0.0”, “unionId=1002840765” ＋ “&materialId=” ＋ 替换链接, 到整数 (“GET”))
json.解析 (京_调用返回)
京东口令 ＝ json.取通用属性 (“data.shortUrl”)
京链位置 ＝ 寻找文本 (京链接, “h”, , 假)
判断 (京东口令 ≠ “”)
msg1 ＝ 文本替换 (京链接, 京链位置, 24, 京东口令)
msg1 ＝ 京链接

msg1 ＝ 京链接组 [i]

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 京链接组, 文本型, , "0"<br /> .局部变量 链接数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 京链接, 文本型<br /> .局部变量 替换链接, 文本型<br /> .局部变量 京东口令, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 京_调用返回, 文本型<br /> .局部变量 京链位置, 整数型<br /> .局部变量 msg1, 文本型<br /> .局部变量 AppKey, 文本型<br /> .局部变量 AppSecret, 文本型<br /> <br /> 链接数 ＝ 文本_分割文本 (到文本 (读入文件 (“C:\京东链接.txt”)), “https://u.jd”, , 京链接组)<br /> ' 分割成数组<br /> AppKey ＝ “*********”<br /> AppSecret ＝ “****************************”<br /> .计次循环首 (链接数, i)<br />     .判断开始 (寻找文本 (京链接组 <i>, “.com”, , 假) ≠ -1)<br />         京链接 ＝ “https://u.jd” ＋ 京链接组 <i><br />         替换链接 ＝ 取文本中间 (京链接, 1, 24)<br />         ' 取出替换链接<br />         ' https://u.jd.com/VtaILyj?<br />         ' https://u.jd.com/VdaQBg9?<br />         ' https://u.jd.com/VCaGGwI?<br />         ' https://u.jd.com/VCaLhrI<br />         京_调用返回 ＝ 大淘客.调用 (“https://openapi.dataoke.com/api/dels/jd/kit/promotion-union-convert”, “v1.0.0”, “unionId=1002840765” ＋ “&materialId=” ＋ 替换链接, 到整数 (“GET”))<br />         json.解析 (京_调用返回)<br />         京东口令 ＝ json.取通用属性 (“data.shortUrl”)<br />         京链位置 ＝ 寻找文本 (京链接, “h”, , 假)<br />         .判断开始 (京东口令 ≠ “”)<br />             msg1 ＝ 文本替换 (京链接, 京链位置, 24, 京东口令)<br />         .默认<br />             msg1 ＝ 京链接<br />         .判断结束<br /> <br />     .默认<br />         msg1 ＝ 京链接组 <i><br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()

补充内容 (2022-9-2 22:57):
京东链接.txt
辣条3包
https://u.jd.com/VtaILyj?
垃圾袋3卷
https://u.jd.com/VdaQBg9?
干脆面3包
https://u.jd.com/VCaGGwI?
保鲜膜1卷
https://u.jd.com/VCaLhrI

伊人独醉

子文本替换 (, , , , , 真)

QQ1329127360

文本_替换（）

如明境

QQ1329127360 发表于 2022-9-3 01:24
文本_替换（）

具体怎么替换最后才可以得到一个整体的文本

如明境

伊人独醉 发表于 2022-9-3 00:35
子文本替换 (, , , , , 真)

这样替换还是没办法

北纬

学习了