联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
::Code by lxmxn @ bbs.cn-dos.net ::CMD逐行读取文本文件的内容,缺点是文件中不能含有CMD的特殊符号 ::Modified 20:53 2007-1-12 ::_______________________ReadTxt.BAT_______________________ @echo off&setlocal ENABLEDELAYEDEXPANSION if "%~s1"=="" (echo 用法:将文件拖放到此批处理文件上释放即可&pause&exit/b 0) FOR /F "DELIMS=" %%A IN ('type %~s1') DO (CALL;:__;"%%A") Endlocal&PAUSE&goto :EOF ::显示字符子函数————————————- :__ SET A="%1" SET B=0 if "%A%"=="" goto end :BEGIN IF NOT "!A:~%B%,1!"=="" ( SET/P=!A:~%B%,1!<NUL PING 127.1 -N 1 >NUL SET/A B+=1 GOTO BEGIN ) else ( :end echo/ ) ::_______________________ReadTxt.BAT_______________________