Board logo

标题: CMD批处理获取文件的ASCII码 [打印本页]

作者: youxi01    时间: 2008-1-18 18:36     标题: CMD批处理获取文件的ASCII码

来源:dos联盟   作者:lxmxm
  1. ::Code by lxmxn @ bbs.cn-dos.net
  2. :::::::::: GetASCII.Bat ::::::::::::
  3. ::Date 22:50 2007-1-9
  4. @echo off&mode con cols=80
  5. :begin
  6. cls
  7. set/p file=请输入要处理的文件(Q 键直接退出此脚本):
  8.         if /i "%file%"=="Q" goto :eof
  9.         if "%file%"=="" goto error
  10. set new=%random%
  11. for %%a in (%file%) do set size=%%~za
  12.         if "%size%"=="0" goto error
  13. cls&fsutil file createnew %new% %size% >nul
  14. echo=&&echo=文件内容所对应的ASCII码的十六进制形式依次为:&echo==========================================================
  15. for /f "skip=1 tokens=3" %%a in ('fc /B %new% %file%') do (
  16.         set /p=%%a <nul
  17. )
  18. echo=&echo==========================================================&echo=&echo=&echo=文件内容所对应的ASCII码的十进制形式依次为:&echo==========================================================
  19. setlocal EnableDelayedExpansion
  20. for /f "skip=1 tokens=3" %%a in ('fc /B %new% %file%') do (
  21.         set num=%%a
  22.         set /a num=0x!num!
  23.         set /p=!num! <nul
  24. )
  25. del %new%
  26. endlocal&echo;&echo==========================================================&echo;&pause
  27. exit /b 0
  28. :error
  29.         cls&echo;&echo;
  30.         echo         “输入错误” OR “文件大小为零”,请重新输入……
  31.         del %new% >nul 2>nul
  32.         set file=
  33.         set new=
  34.         pause>nul&goto :begin
复制代码





欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2