#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
#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
本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。