bat 查找修改文本文件中的文字

用批處理完成比較麻煩，還是用vbs吧，用法與批處理類似：將下面的代碼復制保存為擴展名是vbs的文件，放到與1.vcproj同目錄裏面雙擊運行即可，效率很高。

'══代══碼══開══始════

set fso=CreateObject("Scripting.FileSystemObject")

set ws=CreateObject("wscript.shell")

set fr=fso.opentextfile("1.vcproj",1)

set fw=fso.createtextfile("temp.tmp",2)

do

data=fr.readline

if left(data,5)="Name=" then

k=instr(data,"|")

m=mid(data,7,k-7)

fw.writeline data

fw.writeline "OutputDirectory=""../../"&m&""""

fr.skipline()

else

fw.writeline data

end if

loop until fr.atendofstream

fr.close:fw.close

set fw=fso.opentextfile("1.vcproj",2)

set fr=fso.opentextfile("temp.tmp",1)

fw.write fr.readall

fr.close:fw.close

fso.deletefile "temp.tmp",true

'Coded By escortmnm from VBS團隊

'══代══碼══結══束════