处理UTF-8编码的源文件wiminfo.txt,将结果输出到ANSI编码的文本Hanyeguxing.txt
@echo off&setlocal enabledelayedexpansion&Title 寒夜孤星:代码已通过测试
mode con codepage select=437 >nul
for /f "delims=" %%i in (wiminfo.txt) do (call :Han "%%i"
if /i "!Han:~1,11!"=="IMAGE INDEX" set Xing=!Han:~14,-2!
if /i "!Han:~1,18!"=="DISPLAYDESCRIPTION" echo !Xing! !Han:~20,-21!)>>Hanyeguxing.txt
goto :Xing
:Han
set "Han=%~1"&set Gu=0
:Ye
if "!Han:~%Gu%,1!"==" " set/a Gu+=1&goto :Ye
set Han=!Han:~%Gu%!
goto :eof
:Xing
mode con codepage select=936 >nul
echo 操作已完成&pause
说明:
1,输出文件名“Hanyeguxing.txt”不能使用中文。
2,标签 Xing 部分是为方便楼主在批处理中加入其他命令或代码而设置的,可以不用。
Last edited by Hanyeguxing on 2010-4-1 at 09:47 ]