bat生成utf8编码的文本文件的方法

:write_mz3
    set utf8=65001
    set ansi=936
    chcp %utf8%
    call :write_coded_line %1 "%mz3%"
    chcp %ansi%
:eof_write_mz3
GOTO :EOF

:write_coded_line
:: SUB :write_coded_line
:: param 1: data, param 2: file
SET wcl_out=%~2
SET P0=%1
SET wcl_check=%P0: =%
SET P0=%P0:'="%
SET P0=%P0:|=^|%
SET P0=%P0:-=^-%
SET P0=%P0:<=^<%
SET P0=%P0:>=^>%
SET P0=%P0:!=^!%
SET P0=%P0:(=^(%
SET P0=%P0:)=^)%
SET P0=%P0:;=^;%
SET P0=%P0:&=^&%
:: check for empty row; any separator resulty in a syntax error if "" or '' are included in the string

SET wcl_check=%wcl_check: =%
SET wcl_check=%wcl_check:|=$%
SET wcl_check=%wcl_check:-=$%
SET wcl_check=%wcl_check:<=$$$$%
SET wcl_check=%wcl_check:>=$$$$%
SET wcl_check=%wcl_check:!=$%
SET wcl_check=%wcl_check:(=$%
SET wcl_check=%wcl_check:)=$%
SET wcl_check=%wcl_check:,=$%
SET wcl_check=%wcl_check::=$%
SET wcl_check=%wcl_check:;=$%
SET wcl_check=%wcl_check:&=$%
SET wcl_check=%wcl_check:!=$%
SET wcl_check=%wcl_check:    =%
SET wcl_check=%wcl_check:.=$%
SET wcl_check=%wcl_check:/=$%
SET wcl_check=%wcl_check:'=$%
SET wcl_check=%wcl_check:"=%

IF "%wcl_check%"=="$" SET  wcl_check=
IF "%wcl_check%"=="$$" SET  wcl_check=
IF "%wcl_check%"=="$$$" SET  wcl_check=

IF "%wcl_check%"=="" (
    ECHO.>>"%wcl_out%"
    GOTO EOF_write_coded_line
)
ECHO %P0:~1,-1%>>"%wcl_out%"
:EOF_write_coded_line
GOTO :EOF

经过测试,关键是chcp,设置成什么,输出内容就会是什么.然后echo 出来的文件格式也会自动转成它