[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文件操作] 将rar藏到图片文件里面

无意中在网上看到压缩文档MMX隐身器,但觉得有一些不完美的地方。
  1. ::压缩文档MMX隐身器 0.02
  2. ::Copyright (c)  2007-2010 朴の子.
  3. ::Release date:         2007.02.12
  4. ::Contacts:           G_tz@tom.com
  5. @echo off
  6. color f0
  7. Title 压缩文档MMX隐身器
  8. :start
  9. setlocal enabledelayedexpansion
  10. set pic_num=0
  11. set rar_num=0
  12. for /f %%I in ('dir/b') do (
  13. if /I %%~xI==.jpg set /a pic_num=!pic_num!+1
  14. if /I %%~xI==.png set /a pic_num=!pic_num!+1
  15. if /I %%~xI==.gif set /a pic_num=!pic_num!+1
  16. if /I %%~xI==.ico set /a pic_num=!pic_num!+1
  17. if /I %%~xI==.rar set /a rar_num=!rar_num!+1
  18. )
  19. if !rar_num!==0 goto norar
  20. if !pic_num!==0 goto nommx
  21. if !pic_num! GTR 1 goto muchmmx
  22. if !rar_num! GTR 1 goto muchrar
  23. for %%I in (*.jpg *.png *.gif *.ico) do if not %%~nI==已隐藏 copy /b  %%I+*.rar 已隐藏%%~xI
  24. goto end
  25. :nommx
  26. echo 当前位置不存在jpg、png、gif或ico格式的图片文件(注意文件名不能包含空格)
  27. echo.
  28. echo 请把本程序与1个图片文件、需要隐藏的1个RAR文件放在一起。
  29. echo.
  30. pause>nul
  31. goto end
  32. :norar
  33. echo 当前位置没有RAR压缩文件(注意文件名不能包含空格)
  34. echo.
  35. echo 请把本程序与1个图片文件、需要隐藏的1个RAR文件放在一起。
  36. echo.
  37. pause>nul
  38. goto end
  39. :muchmmx
  40. echo 当前位置不能放置2个以上的图片文件。
  41. echo.
  42. echo 请把本程序与1个图片文件、需要隐藏的1个RAR文件放在一起。
  43. echo.
  44. pause>nul
  45. goto end
  46. :muchrar
  47. echo 当前位置不能放置2个以上的压缩文件。
  48. echo.
  49. echo 请把本程序与1个图片文件、需要隐藏的1个RAR文件放在一起。
  50. echo.
  51. pause>nul
  52. :end
复制代码


用这个隐藏rar时,生成的图片文件名为“已隐藏”,可不可以直接将生成的图片文件名和rar同名?

这个批处理只可以隐藏没有空格的rar,为什么呢?可以去掉这个条件吗?

[ 本帖最后由 Wingl83 于 2008-8-28 20:00 编辑 ]
1

评分人数

    • namejm: 标题模糊,请按照总版规的要求修改。PB -2
我是小菜菜……

for %%I in (*.jpg *.png *.gif *.ico) do if not %%~nI==已隐藏 copy /b  %%I+*.rar 已隐藏%%~xI
关键代码就这一句而已,看不懂的话,建议读批处理基础教程。

//用这个隐藏rar时,生成的图片文件名为“已隐藏”,可不可以直接将生成的图片文件名和rar同名?
你把上面那条语句看明白了就知道怎么改了。

//这个批处理只可以隐藏没有空格的rar,为什么呢?可以去掉这个条件吗?
因为处理文件名的时候没有加双引号,你给它加上就行了。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

copy /b 图片名 + rar文件 新图片文件

TOP

返回列表