请高手写一个批处理文件或帮忙找一个字符替换软件软件

'复制到记事本另存为a.vbs 把你要处理的内容存到a.txt文件里（两个文件在同一目录下）
str=split("A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0 1 2 3 4 5 6 7 8 9 0 a b c d e f g h i j k l m n o p q r s t u v w x y z")
set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile("a.txt")
do while file.atendofstream<>true
s=s & replace(file.readline,"name","name" & myreplace) & vbcrlf
loop
file.close
set file=fso.createtextfile("#a.txt")
file.write s
file.close
ws.run "#a.txt"
function myreplace()
randomize
h=int(rnd()*4)+3
for i=1 to h
n=int(rnd()*ubound(str))
myreplace=myreplace & str(n)
next
end function

用Replace Pioneer,支持带函数的替换，处理这个问题极简单，只要把name替换成"name".join('',map{('a'..'z',0..9)[rand(36)]}(1..4))就可以了。

========================
详细步骤：
1. ctrl-o打开txt文件
2. ctrl-h打开replace窗口
在search for pattern输入name,在replace with pattern输入：
"name".join('',map{('a'..'z',0..9)[rand(36)]}(1..4))
3. 点击Replace即完成。
========================
注：
* 如需改字符比如加上大写字母，就写成'a'..'z','A'..'Z',0..9
* 如需增加长度，如6位，就把(1..4)改成(1..6)
========================
* 结果示例：
namek4so:xxx word:xxx
namevktq:xdfax word:xxfdafx
namedy0s:xxxfda word:xfdafxx
namewrgh:xfdafxx word:xxfdafx