Underhing

ОС ЛАБЫ 2

Feb 18th, 2020
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.45 KB | None | 0 0
  1. @echo off
  2. chcp 1251 >nul
  3. CLS
  4. TITLE [Просмотр каталогов] %DATE%
  5. ECHO [Просмотр каталогов] %DATE%
  6. ECHO ---------------
  7. ECHO [] Данная утилита выводит список всех файлов из указанных Вами каталогов в определенный файл
  8. ECHO [] Количество указываемых каталогов не ограничено
  9. ECHO [] Запуск: [.bat файл] [файл для сохранения] [каталог_1] [каталог_2] и т.д.
  10. ECHO ---------------
  11. ECHO.
  12. ECHO ---------------
  13. ECHO Входные данные:
  14.  
  15. REM ------------------------------------ ВЫВОД ИНФОРМАЦИИ ---------------------------------------
  16.  
  17. SET cnt=
  18.  
  19. IF "%~1"=="" (
  20. ECHO Файл для сохранения - не указан!
  21. ) ELSE (
  22. ECHO Файл для сохранения - %1%
  23. )
  24.  
  25. for %%i in (%*) do set /a cnt+=1
  26. IF NOT "%cnt%"=="" (
  27. SET /a cnt=%cnt%-1
  28. ) ELSE (
  29. SET cnt=0
  30. )
  31.  
  32. ECHO Вы указали (%cnt%) каталога(ов) для поиска файлов
  33. ECHO ---------------
  34. ECHO.
  35.  
  36. REM ------------------------------------ НАЧАЛО ПРОГРАММЫ ---------------------------------------
  37.  
  38.  
  39. IF "%~1"=="" (
  40. echo [Фатальная ошибка!] Не указана папка для сохранения результата& exit /B
  41. )
  42.  
  43. IF "%cnt%"=="0" (
  44. echo [Фатальная ошибка!] Вы не указали ни одного каталога для поиска файлов& exit /B
  45. )
  46.  
  47.  
  48. SET save_path=%1
  49. shift
  50.  
  51.  
  52. help >> %save_path%
  53. IF %ErrorLevel% equ 0 (
  54. ECHO [Фатальная ошибка!] Указанный вами файл сохранения [%save_path%] невозможно создать! Пожалуйста, проверьте указанный путь& exit /B
  55. ) ELSE (
  56. ECHO Указанный вами файл сохранения был успешно создан!
  57. )
  58.  
  59. ECHO Файл для сохранения [%save_path%] был предварительно очищен
  60. cd.>%save_path%
  61. ECHO.
  62.  
  63. ECHO ----Начало работы----
  64.  
  65. for %%i in (%*) do (
  66.  
  67. IF NOT %%i==%save_path% (
  68.  
  69. IF NOT EXIST %%i (
  70. ECHO [Ошибка!] Указанный вами каталог [%%i] не существует
  71. ) ELSE (
  72. DIR %%i >> %save_path%
  73. ECHO Все файлы из каталога [%%i] успешно сохранены в файл [%save_path%]
  74. )
  75.  
  76. )
  77.  
  78.  
  79. )
Add Comment
Please, Sign In to add comment