中国DOS联盟

set fso=createobject("scripting.filesystemobject")

set file=fso.opentextfile("a.txt",1)

do while file.AtEndOfStream <> True

n=file.readline

if left(n,9)="FileName=" then m=m&right(n,len(n)-9)&vbcrlf

if left(n,5)="Path=" then m=m&right(n,len(n)-5)&vbcrlf

loop

file.close

set file=fso.createtextfile("my.txt",true)

file.write m

file.close

msgbox "提取内容成功！请查看my.txt文件。",48+4096,"操作完成"

for /f "tokens=2 delims==" %%i in (test.txt) do (>>my.txt echo %%i)

for /f "tokens=1,2 delims==" %%i in (test.txt) do (

if "%%i"=="FileName" (>>my.txt echo. %%j)

if "%%i"=="Path" (>>my.txt echo. %%j)

)