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

[文件操作] 批处理创建迷宫文件夹【原创】

今天玩玩批处理,创建出了一个迷宫文件夹。
运行后,在批处理所在目录,你将会看见一个个文件夹乖乖的,整齐地排着队在你面前,1,2,3,4,5,6,7,8,9,10,11,12……打开其中一个,空的?又打开一个,还是空的……当你狠狠地砸下鼠标,终于找到了一不是空的文件夹,但是里面还是文件夹,1,2,3,4,5,6,7,8,9,10,11,12……当你打开最后一层文件夹时,你可能已经炸了……呵呵,考验你的耐心~
  1. @echo off
  2. set /p gs=请输入每层文件夹个数(1~1000):
  3. set /a gs=gs
  4. set /p cs=请输入文件夹层数(1~1000÷文件夹的个数):
  5. echo %cs%
  6. set /a zdcs=1000/%gs%
  7. echo %zdcs%
  8. if %gs% gtr 1000 (echo.文件夹过多!&pause&exit) else (
  9. if %cs% gtr %zdcs% (echo.文件夹过多!&pause&exit))
  10. set js=0
  11. :a
  12. ::这里不用For,因为懒得用变量延迟,麻烦太大~
  13. set /a js=js+1
  14. for /l %%a in (1 1 %gs%) do (
  15. md %%a)
  16. set /a gs2=%gs%+1
  17. set /a nowdir=%random%%%%gs%
  18. cd %nowdir%
  19. if %js% equ %cs% (cls
  20. echo.路径:%cd%
  21. pause) else (goto a)
复制代码

  1. md a
  2. cd a
  3. %0
复制代码
这个也可以

TOP

返回列表