bat修改文件内容

#file.vbs
Set fso = Wscript.CreateObject("Scripting.FileSystemObject")
set f=fso.opentextfile("d:\11.txt")
s=replace(f.readall,"192.168.1.1","www.baidu.com")'
f.close
set r=fso.opentextfile("d:\11.txt",2,true)
r.write s
Wscript.quit