1、批量更改文本文件內容的方法作者：新空教程整理日期：2010年01月29日批量更改文本文件內容的方法：因為各種原因，有時需要批量更改文件文件中的內容，比如將電腦”改成計算機”，下面給出一個簡單的方法。一、批處理方法：echoofffor/f"delims="%iin('dir/s/b*.txt')do批量更改文本文件內容的方法：因為各種原因，有時需要批量更改文件文件中的內容，比如將電腦改成計算機”，下面給出一個簡單的方法。一、批處理方法：echoofffor/f"delims="%iin('dir/s/b*.txt')do(

2、for/f"delims="%ain('type"%fi"')do(set"foo=%a"call,setfoo=%foo:電腦=計算機%call,echo/%foo%>>"%fi._")move"%fi._""%fi"exit將上面內容拷入文本文件，然后更改成“ba戊件，雙擊執行即可二、vb腳本的方法：SetWshShell=CreateObject("Wscript.Shell")WshShell.Run"cmd/

3、cdir/s/b*.txt>list.txt",vbHideWscript.Sleep1000sFile="list.txt"SetobjFSO=CreateObject("Scripting.FileSystemObject")SetoFile=objFSO.OpenTextFile(sFile,1)DoWhileNotoFile.AtEndOfStreamstrLine=oFile.ReadLineIfLen(strLine)>0ThenSetFile=objFSO.OpenTextFile(strLine,1)aryLines

4、=File.ReadAllFile.ClosearyLines=Replace(aryLines,'電腦","計算機”)SetFile=objFSO.OpenTextFile(strLine,2)File.WritearyLinesFile.CloseEndIfLoopoFile.CloseobjFSO.DeleteFilesFileSetobjFSO=Nothing保存擴展名為VBS,放到TXT文件所在目錄，雙擊執行如何批量修改TXT文件中指定字符？此問題的推薦答案用批處理就可以，把原來的txt命名為1.txt，下面代碼保存為bat運行后2.txt就是你想要的文件

5、，有問題hi我echooffsetlocalenabledelayedexpansionset/acount=1for/F"tokens=*"%iin(1.txt)docall:."%i"pauseexitsetwork=%1setwork=%work:1=1(!count!)%setwork=%work:<=A<%setwork=%work:>=A>%echo%work:1,-1%>>2.txtset/acount+=1如何用批處理結合VBS實現批量替換修改txt文本？懸賞分：20-解決時間：2009-11-2221

6、:21我這目錄里有很多TXT文檔，1.txt,2.txt,3.txt里面有2處內容需要替換：“name=T替換成"name=19,還有“path=e:game”替換成“path=e:game因為bat很難實現對txt的替換，我這有2個VBS分別替換2處，要運行2個VBS才可以替換成功1個txt文本，問題是運行1次bat不可以打開2個vbs,而且郁悶的是要指定路徑D:11.txt,這樣每次要修改，有沒有可以結合bat和vbs同時批量替換2處的，謝謝！下面是我的代碼：SetFSO=NothingDimstrFile:strFile="D:11.txt"DimFSO:S

7、etFSO=CreateObject("Scripting.FileSystemObject")DimobjFile:SetobjFile=FSO.OpenTextFile(strFile)DimstrContent:strContent=objFile.ReadallobjFile.CloseDimobjRegEx:SetobjRegEx=CreateObject("VBScript.RegExp")objRegEx.Global=TrueobjRegEx.IgnoreCase=TrueobjRegEx.Pattern="path=e:gam

8、e"DimobjNewText:objNewText=objRegEx.Replace(strContent,"path=e:game")DimobjTextFile:SetobjTextFile=FSO.CreateTextFile("D:11.txt")objTextFile.WriteobjNewTextobjTextFile.CloseSetFSO=Nothing提問者：1200729491-一級最佳答案突然來了點靈感，給你來一行另類的。注意，代碼只有一行。批處理放在txt文件夾下運行echooff&for%1in(*.txt)domshtavbscript:createobject("scripting.filesystemobject").opentexfile("wind-%1",2,true).whteline(replace(replace(createobject("scripting.filesystemobject").opentextfile("%1",1).readall,"name=