如何这样替换字串？
如何这样替换字串？
有一个memo字段中内容如下：
name="abc"
okokok
name="abcde"
okokok
name="123456789"
okokok
name="xyz"
我需要一个函数把所有name=后的引号中的内容都换成同一个串如"Cnina"
代码怎么写？
[解决办法]
替换法，和 组合法
替换法
Clear
lcstr = Filetostr("aat.txt")
ns = 1
Do While At('name="',lcstr,ns) != 0
lcstr = Strtran(lcstr,'"' + Strextract(lcstr,'name="','"',ns) + '"','"Cnina"')
ns = ns + 1
Enddo
?lcstr
For lnI=Occurs('name=',备注字段名) To 1 Step -1
Replace 备注字段名 With Strtran(备注字段名,Strextract(备注字段名,'name="','"',lnI),'Cnina')
Endfor