Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > ОС и железо
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 14.09.2013, 19:17
MahovIV MahovIV вне форума
Новичок
 
Регистрация: 30.12.2012
Сообщения: 77
Репутация: 10
По умолчанию Пакетные файлы

Мне нужно сделать такое задание.
Создать пакетный файл, содержащий команды операционной системы и выполняющий следующую последовательность операций:
• создать на диске H: папку MyTemp;
• скопировать в папку H:\MyTemp файлы C:\autoexec.bat и C:\config.sys;
• вывести на экран содержимое папки H:\MyTemp, приостановив при этом выполнение пакетного файла;
• переименовать в папке H:\MyTemp все файлы, заменив расширения на bak;
• удалить из папки H:\MyTemp все файлы с расширением bak;
• вывести на экран содержимое папки H:\MyTemp, приостановив при этом выполнение пакетного файла;
• удалить с диска H: папку MyTemp и вывести на экран содержимое диска H:.
Использовать для трассировки процесса выполнения команд команду ECHO.
Содержимое файла выглядит так.
Код:
echo
MD D:\MyTemp
echo
copy C:\autoexec.bat D:\MyTemp
copy C:\config.sys D:\MyTemp
echo
dir D:\MyTemp
pause
echo
REN | RENAME D:\MyTemp\*.* *.bat
echo 
del D:\MyTemp\*.bat
echo
dir D:\MyTemp
pause
echo
rd D:\MyTemp
dir D:\
Я не понимаю, почему не работает команда REN?
Ответить с цитированием
  #2  
Старый 14.09.2013, 23:38
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,024
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Да работает, вроде, все...
Во немного поправленный твой код (с привязкой к моим файлам)...
Код:
echo Create temporary folder
MD D:\MyTemp
echo Copy files to the temporary folder
copy C:\Demo\autoexec.bat D:\MyTemp
copy C:\Demo\config.sys D:\MyTemp
echo Show list files in the temporary folder
dir D:\MyTemp
pause
echo Rename files to *.bak
REN D:\MyTemp\*.* *.bak
echo Show list files in the temporary folder
dir D:\MyTemp
pause
echo Delete *.bak from the temporary folder
del D:\MyTemp\*.bak
echo Show list files in the temporary folder
dir D:\MyTemp
pause
echo Delete temporary folder
rd D:\MyTemp
echo Show list files in the disk root
dir D:
pause
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 16:39.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter