Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?
Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация
Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Задачи на bat-файлах 4

Модерирует : KLASS, IFkO

evle (19-03-2008 19:44): Лимит страниц.
Задачи на bat-файлах 5 		 Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103

   

vu1tur



Moderator-Saaber		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Задачи на bat-файлах
(часть 1, часть 2, часть 3)
Вопросы, задачи и их решения по работе с командными файлами, а также сопутствующие ссылки.

 
Важно: копируя батник через буфер обмена из форума не забывайте удалять пробелы в конце каждой строки, т.к. в некоторых случаях из-за этого программа будет работать неправильно!!!
 
Также для удаления концевых пробелов пользуйтесь скриптом от Nagual, или VBS-Скрипт-Модулем от ViSiToR.
 
Дополняем шапку: добавляем готовые решения, полезные ссылки.
 
Примечание: Большие куски кода заключайте в тэг [more]  
 
Смежные темы:
В помощь системному администратору » Автоматизация администрирования
Программы » Командная строка, батники\сценарии
 
Полезные ссылки
 
Полезные утилиты
 
Готовые решения и частые вопросы:
  • Встроенный справочник по командам
  • Создание помощи по всем командам консоли 2000 и XP
  • Делаем паузу в командном файле стандартными средствами Windows
  • Альтернативные решения »
  • Работа с текстом, датой, и файлами »
  • Администрирование, автоматизация и сеть »
  • Работа с переменными и параметрами ком. строки »
     
    Описания работы команд и символов участниками темы:
    · setlocal enabledelayedexpansion и переменные окружения
    · символы & и && в командной строке
    · Переменная %0
    • Всего записей: 3690 | Зарегистр. 01-02-2003 | Отправлено: 15:21 11-09-2007 | Исправлено: Elroir, 01:52 26-02-2008
    king_stiven

    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    3y6acTuK
    исправил
    echo %~dp0
     
    Добавлено:
    3y6acTuK
    5.

    Код:
    for /f "usebackq tokens=*" %%c in (`dir /b /s /a:-d`) do del "%%c"
    Всего записей: 2229 | Зарегистр. 17-07-2006 | Отправлено: 20:35 06-03-2008
    3y6acTuK

    Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

    Цитата:
    for /f "usebackq tokens=*" %%c in (`dir /b /s /a:-d`) do del "%%c"

    А что оно делает? Просто не пойму как это вставить - что такое %%c здесь? Если это имя файла, то мне не нужно файл удалять, а только проверить, что отсутствует файл с таким именем.
    Всего записей: 385 | Зарегистр. 23-07-2007 | Отправлено: 21:36 06-03-2008
    01MDM



    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    3y6acTuK

    Цитата:
    5) Как очистить дерево каталогов от файлов (удалить все файлы, оставив каталоги)?
     

     
    del /s /a /q Folder\*.*
     

    Цитата:
     
    Нет, не получится как я хотел - нужно удостовериться, что файл не существует... а FOR может кажется только проверять существование элемента в списке...  
     

    Что не получится? Напиши подробнее.
    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 21:41 06-03-2008
    king_stiven

    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    3y6acTuK
    Ты спросил:

    Цитата:
    5) Как очистить дерево каталогов от файлов (удалить все файлы, оставив каталоги)?  

    Я ответил:

    Код:
    for /f "usebackq tokens=*" %%c in (`dir /b /s /a:-d`) do del "%%c"  
     

    Мой ответ правильный. Некоторые файлы по различным причинам не будут удаляться. Смотри справку по команде del и добавляй нужные ключи.
    Суёшь эту строчку в батник, который запускаешь из нужного каталога. В этом каталоге и во всех вложенных подкаталогах файлы удалятся.
    Что неясно?
     
    bobojon
    Разбери вывод команды tasklist с помощью команды for
    Если нет процесса router.exe, запускай его

    Код:
    "D:\SOFITCOM\Router\router.exe"

    Включай паузу команда ping
    закольцовывай команда goto
    В этом топике я выкладывал закольцовку команды с паузой.
    Всего записей: 2229 | Зарегистр. 17-07-2006 | Отправлено: 21:58 06-03-2008 | Исправлено: king_stiven, 22:04 06-03-2008
    3y6acTuK

    Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    king_stiven
    А вот и мне кстати интересно как можно проверить, что подстрока отсутствует в списке (bobojon нужно убедиться что нет имени router.exe в списке tasklist, а мне - что нет имени файла в списке dir)...
    Всего записей: 385 | Зарегистр. 23-07-2007 | Отправлено: 22:46 06-03-2008
    king_stiven

    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    bobojon

    Код:
    @echo off  
    :begin
    for /f %%c in ('tasklist /nh') do if /i "%%c"=="router.exe" set router=yes
    if not defined router "D:\SOFITCOM\Router\router.exe"
    ping -n 640 -w 1000 localhost > nul
    set router=
    goto :begin

    Меняй цифру 640 для нужной паузы
    Всего записей: 2229 | Зарегистр. 17-07-2006 | Отправлено: 22:52 06-03-2008 | Исправлено: king_stiven, 23:13 06-03-2008
    Nagual



    Full Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    3y6acTuK

    Цитата:
    5) Как очистить дерево каталогов от файлов (удалить все файлы, оставив каталоги)?

    robocopy c:\source c:\dest /e /create /xf * /min:1
     
    Добавлено:

    Цитата:
    а мне - что нет имени файла в списке dir)...

    dir/b|findstr test.txt||echo file not exist
    Всего записей: 528 | Зарегистр. 06-01-2006 | Отправлено: 23:41 06-03-2008
    bobojon



    Junior Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Большое Большое СПАСИБО king_stiven  Вы не представляете как я РАД ЭТОМУ БАТНИКУ!
     
    Добавлено:
    вот возник еще один вопрос: Этот код работает в ХР! - но на Windows2000 нет!!! как его переделать для 2000-ка?

    Цитата:
    @echo off  
    :begin  
    for /f %%c in ('tasklist /nh') do if /i "%%c"=="router.exe" set router=yes  
    if not defined router "D:\SOFITCOM\Router\router.exe"  
    ping -n 640 -w 1000 localhost > nul  
    set router=  
    goto :begin

     
     
    Добавлено:
    ВСе спасибо ВСЕМ ! разобрался сам,сделал следующее:
    Во первых достал с дистрибютива Win2000 \support\tools утилиту tlist.exe закинул ее в %windir%\system32 и попробовал вот так:

    Код:
    @echo off
    :begin
    for /f %%c in ('tlist') do if /i "%%c"=="router.exe" set router=yes
    if not defined router "D:\SOFITCOM\Router\router.exe"
    ping -n 640 -w 1000 localhost > nul
    set router=
    goto :begin
    Всего записей: 53 | Зарегистр. 06-03-2008 | Отправлено: 02:05 07-03-2008
    Astron



    Advanced Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Elroir

    Цитата:
    Только что проверил еще раз - скопировал текст .reg файла из форума, создал новый .reg файл, внес в него этот текст, сохранил. Импортировал его в реестр, кликнув по нему 2 раза мышкой. Меню появилось и на файлах и на директориях.  
    Проверь, что у тебя есть права на редактирование реестра.

    Всё получилось. А можно еще, чтобы это действовало на все файлы и подкаталоги, если действие применяется к каталогу?
    Всего записей: 790 | Зарегистр. 28-12-2003 | Отправлено: 09:27 07-03-2008
    Joolz

    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    TKVzic
    Надыбал где-то такой скрипт:

    Код:
     
    '************************************************************  
    '* Имя: Shortcut_Create.vbs                                 *  
    '* Язык: VBScript                                           *  
    '* Назначение: Создание и настройка ярлыка на рабочем столе *
    '************************************************************
     
    Set objShell = CreateObject("Shell.Application")
    Set objDesktop = objShell.NameSpace(&H0)
    desktopDir = objDesktop.Self.Path & "\"
    Set objDesktop = Nothing
    Set objShell = Nothing
    Set objWShell = CreateObject("WScript.Shell")
    Set objSC = objWShell.CreateShortcut(desktopDir & "ДубльГИС, Новосибирск.lnk")
    objSC.Description = "План города"
    objSC.IconLocation = "shell32.dll, 13"
    objSC.TargetPath = "C:\Program Files\2gis\Nsk\grym.exe"
    objSC.WindowStyle = 1
    objSC.WorkingDirectory = "C:\Program Files\2gis\Nsk"
    objSC.Save
    Set objSC = Nothing
    Set objWShell = Nothing
     
    Всего записей: 100 | Зарегистр. 24-01-2008 | Отправлено: 10:38 07-03-2008
    demon1981



    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Народ не подскажете как в батнике поменять "свойства папки" в WinXPProfSP2 без применения нестандартных утилит. К примеру галки "автоматический поиск сетевых папок и принтеров" "скрывать защищенные системные файлы (рекомендуется)" и кнопка "применить ко всем папкам"
    Всего записей: 189 | Зарегистр. 28-03-2007 | Отправлено: 10:43 07-03-2008
    Leshgan



    Junior Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Есть папка FILES, в ней файлы *.ext
    мне надо получить текстовый файл со списком всех файлов в этой папке. И потом (в другом bat-нике прочитать этот список.
    Как это сделать?
    dir FILES\*.ext > file.txt  
    не подойдет, его потом читать сложно
    Всего записей: 187 | Зарегистр. 15-10-2002 | Отправлено: 12:18 07-03-2008
    01MDM



    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Leshgan

    Код:
     
    @echo off
    ::
    :: chcp 1251 >nul
    ::
    dir /b FILES\*.ext>file.txt
    for /f "tokens=*" %%i in (file.txt) do echo %%i
     

    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 12:27 07-03-2008 | Исправлено: 01MDM, 12:28 07-03-2008
    king_stiven

    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Leshgan

    Цитата:
    мне надо получить текстовый файл со списком всех файлов в этой папке.


    Код:
    for /f "tokens=*" %%c in ('dir FILES\*.ext /b /a:-d') do echo %%c>> file.txt

     

    Цитата:
    И потом (в другом bat-нике прочитать этот список.  


    Код:
    for /f "usebackq tokens=*" %%c in ("file.txt") do echo %%c
    Всего записей: 2229 | Зарегистр. 17-07-2006 | Отправлено: 12:27 07-03-2008
    Maza Faka



    Advanced Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    demon1981

    Цитата:
    галки "автоматический поиск сетевых папок и принтеров" "скрывать защищенные системные файлы (рекомендуется)"


    Код:
    @echo off
    reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /t REG_DWORD /v SuperHidden /d 0 /f
    reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /t REG_DWORD /v NoNetCrawling /d 0 /f

    По поводу
    Цитата:
    кнопка "применить ко всем папкам"
    не нашёл.
    Всего записей: 1420 | Зарегистр. 25-10-2006 | Отправлено: 12:33 07-03-2008
    Leshgan



    Junior Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    01MDM
    king_stiven
    Большое спасибо! То, что надо!
    Можете пояснить вот эту часть?

    Цитата:
    tokens=*

     
    А точнее я не понял из описания команды что тут дает символ *
    Всего записей: 187 | Зарегистр. 15-10-2002 | Отправлено: 12:39 07-03-2008
    01MDM



    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Leshgan
    Игнорирует разделители (пробелы) в выводимой строке, если они там есть. Поставь для эксперимента tokens=1
     
    Даже правильней не игнорирует, а объединяет все части строки, начиная с начала.
    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 12:41 07-03-2008 | Исправлено: 01MDM, 12:43 07-03-2008
    Elroir



    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Astron

    Цитата:
    А можно еще, чтобы это действовало на все файлы и подкаталоги, если действие применяется к каталогу?

    Попробуй так:

    Код:
    @echo off
    setlocal
    pushd "%~1" >nul 2>&1 || goto file_rename
    popd
    call :process_files %1
    call :process_dirs %1
    :file_rename
    pushd "%~dp1"
    call :do_rename %1
    popd
    goto :EOF
    :process_files
    pushd %1
    for %%a in (*.*) do call :do_rename "%%~fa"
    popd
    goto :EOF
    :process_dirs
    pushd %1
    for /d %%a in (*.*) do call :do_rename "%%~fa"
    for /d %%a in (*.*) do call "%~f0" "%%~fa"
    popd
    :do_rename
    set "name=%~nx1"
    set "name=%name: =_%"
    ren "%~nx1" "%name%"
     

    У меня не было времени как следует протестировать код, так что сначала проверяй на чем нибудь неважном.
     
    P.S. Спасибо Nagual за помощь и объяснения по подсветке кода.
     
     
    Добавлено:
    да... почему-то подсветка получилась совсем не такая, какая подразумевалась :-)  
     
    Добавлено:
    А вот теперь получилось :-)

    ----------
    "В интернете есть все, но не всегда"
    Всего записей: 2631 | Зарегистр. 05-02-2003 | Отправлено: 16:42 08-03-2008 | Исправлено: Elroir, 00:24 10-03-2008
    Maza Faka



    Advanced Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

    Цитата:
    Спасибо Nagual за помощь и объяснения по подсветке кода.

    Может Nagual всем обьяснит как подсвечивать код?
    Всего записей: 1420 | Зарегистр. 25-10-2006 | Отправлено: 07:49 09-03-2008
    01MDM



    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Maza Faka

    Цитата:
    Может Nagual всем обьяснит как подсвечивать код?  

    Если он это делает не вручную. Я знаю только через bbtag color
     
    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 10:21 09-03-2008
       

    Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103

    Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Задачи на bat-файлах 4
    evle (19-03-2008 19:44): Лимит страниц.
    Задачи на bat-файлах 5


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru