vu1tur Moderator-Saaber Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Задачи на bat-файлах 10 (часть 1, часть 2, часть 3, часть 4, часть 5, часть 6, часть 7, часть 8, часть 9) Вопросы, задачи и их решения по работе с командными файлами, а также сопутствующие ссылки.   Важно: копируя батник через буфер обмена из форума не забывайте удалять пробелы в конце каждой строки, т.к. в некоторых случаях из-за этого программа будет работать неправильно!!! Чтобы не копировались концевые пробелы из форума, жмите на ссылку "Редактировать" в посте, и уже из редактора копируйте батник без пробелов.   Также для удаления концевых пробелов пользуйтесь скриптом от Nagual, или VBS-Скрипт-Модулем от ViSiToR.   Для перекодирования кирилицы 866<—>1251 пользуйтесь онлайн сервисом Перекодировщик кириллицы   Дополняем шапку: добавляем готовые решения, полезные ссылки.   Примечание: Большие куски кода заключайте в тэг [more]     Смежные темы: В помощь системному администратору » Автоматизация администрирования Программы » Командная строка, батники\сценарии   Полезные ссылки   Полезные утилиты   Готовые решения и частые вопросы: Встроенный справочник по командам Создание помощи по всем командам консоли 2000 и XP Делаем паузу в командном файле стандартными средствами Windows Альтернативные решения » Работа с текстом, датой, и файлами » Администрирование, автоматизация и сеть » Работа с переменными и параметрами ком. строки »   Описания работы команд и символов участниками темы: · setlocal enabledelayedexpansion и переменные окружения · символы & и && в командной строке · Переменная %0 Всего записей: 3690 | Зарегистр. 01-02-2003 | Отправлено: 11:53 09-01-2011 | Исправлено: mazafakermazafaka, 11:22 04-06-2011

bandit82 Newbie Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору wolf0425,  01MDM Спасибо огромное! Всего записей: 5 | Зарегистр. 08-09-2007 | Отправлено: 18:34 03-06-2011

01MDM Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору muk_as Цитата: необходимо чтобы скрыть код батника от посторонних глаз По сути это самообман. Все равно экзешник только контейнер, который распаковывается в %TEMP% и там выполняется батник. Вот почему msg.exe не отрабатывает? Наверное это зависит от системы. Например у меня на Win-7 HP он запрятан глубоко в \Windows\winsxs\. Естественно он не в %PATH%. добавь в батник поиск msg.exe: Код:   for /f "tokens=*" %%i in (' dir /b /s /a-d %systemroot%\msg.exe ') do set "path=%path%;%%~dpi"   Вариант с упаковкой в екзешник экземпляра msg.exe боюсь будет не универсальным, как наверное и поиск файла выше. ---------- Вопросы в личке останутся без ответа Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 21:21 03-06-2011

GORA2 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Например у меня на Win-7 HP он запрятан глубоко в \Windows\winsxs\. x64 ? Она все там же и x64 в C:\Windows\System32, только искать надо x64 приложением. ТС ее не находит, а windows-кий поиск нормально находит. Всего записей: 1271 | Зарегистр. 26-01-2006 | Отправлено: 22:28 03-06-2011

mazafakermazafaka Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору 01MDM Как-то привык, что в Win98SE командный интерпретатор по команде ver выводил, что он - MS-DOS 7.0, вот и написал про "средства DOS"   Спасибо большое за подсказку. Сделал правда чуть по другому, но направление вы дали верное У меня получилось так:   Код:   echo. echo * Disabling SFC... (типа отключаем самозащиту файлов Windows)   rem Для поддержки русского в именах файлов chcp 1251 >nul   rem Читаем ключи реестра   for /f "usebackq skip=2 tokens=2,*" %%i IN (`reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup" /v "SourcePath"`) DO (   set "SourcePathW=-%%j" )   for /f "usebackq skip=2 tokens=2,*" %%i IN (`reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup" /v "ServicePackSourcePath"`) DO (   set "SourcePathSP=-%%j" )   for /f "usebackq skip=2 tokens=2,*" %%i IN (`reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "SourcePath"`) DO (   set "SourcePathNT=-%%j" )   rem Если значение переменной оканчивается на \, то добавляем еще один \ в конец if "%SourcePathW:~-1%"=="\" set "SourcePathW=%SourcePathW%\" if "%SourcePathSP:~-1%"=="\" set "SourcePathSP=%SourcePathSP%\" if "%SourcePathNT:~-1%"=="\" set "SourcePathNT=%SourcePathNT%\" rem Удаляем первый символ "-", добавленный при чтении ключей, чтобы избежать пустого значения переменной   set "SourcePathW=%SourcePathW:~1%" set "SourcePathSP=%SourcePathSP:~1%" set "SourcePathNT=%SourcePathNT:~1%"   chcp 866 >nul   rem Очищаем ключи реестра reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup" /v "SourcePath" /t REG_SZ /d "" /f reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup" /v "ServicePackSourcePath" /t REG_SZ /d "" /f reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "SourcePath" /t REG_SZ /d "" /f   ===программа===   echo. echo * Enabling SFC...   chcp 1251 >nul   rem Возвращаем значения ключей в реестр из переменных reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup" /v "SourcePath" /t REG_SZ /d "%SourcePathW%" /f reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup" /v "ServicePackSourcePath" /t REG_SZ /d "%SourcePathSP%" /f reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "SourcePath" /t REG_SZ /d "%SourcePathNT%" /f   chcp 866 >nul   Всего записей: 685 | Зарегистр. 22-04-2003 | Отправлено: 03:45 04-06-2011

res2001 Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору AlexanderNON Проще всего определить день недели с помощью VBS/JS скрипта или задать дату пятницы в параметре. Тебе как? Всего записей: 2580 | Зарегистр. 11-04-2003 | Отправлено: 14:53 05-06-2011

wolf0425 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Нужно удалить все файлы из папки, оставив только те, которые были созданы в пятницу.   а это нужно однократно что-то рассортировать или настроить для каждой пятницы? просто если для каждой - то настраиваешь шедулер на запуск батника вечером пятницы, в батнике удаляешь всё с датой "не сегодня"...     Всего записей: 2928 | Зарегистр. 25-04-2007 | Отправлено: 16:56 05-06-2011

yurkesha Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alexey87 Проверяй (через reg query) наличие HKCR\.pdf - если есть значит в систме зарегистрирована прога для его открытия... ---------- Всем непричастным рекомендую прогулки на свежем воздухе Всего записей: 2741 | Зарегистр. 15-12-2003 | Отправлено: 17:45 05-06-2011

01MDM Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alexey87 Ассоциацию можно проверить с помощью команд assoc и ftype: Код:   @echo off setlocal   set "file=%1" 2>nul 1>&2 assoc .pdf || goto:foxit   for /f "tokens=2 delims==" %%i in (' assoc .pdf ') do (       for /f "tokens=2 delims==" %%j in (' ftype %%i ') do call:echo %%j   ) goto:eof   :foxit start  "" "e:\pdf\foxitreader.exe" %file%   goto:eof   :echo start "" %1 %file%   ---------- Вопросы в личке останутся без ответа Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 18:28 05-06-2011 | Исправлено: 01MDM, 18:51 05-06-2011

01MDM Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alexey87 Поправил. Пути сам отредактируешь, батник запускать с файлом pdf  в качестве параметра. ---------- Вопросы в личке останутся без ответа Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 18:46 05-06-2011

Free_Soft Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору запрос Код: wmic path OfficeSoftwareProtectionProduct where (PartialProductKey!=null) get Name /value выдает ответ вида Код: Name=Office 14, OfficeVisioProMSDN-Retail edition     Name=Office 14, OfficeProPlusMSDN-Retail edition нужно при наличии упоминания RETAIL присвоить строчкам порядковый номер и создать разные переменные с именами из вывода. пробую так Код: @echo off setlocal enabledelayedexpansion set cnt=1 for /f "tokens=3 delims=, " %%a in ('wmic path OfficeSoftwareProtectionProduct where ^(PartialProductKey!^=null^) get Name /value') do (    set /a cnt=cnt+1    echo.%%a | findstr /i "RETAIL" >nul && set name!cht!=%%a& echo.!cht!. %%a ) pause но видно, что-то не так пробую... ---------- На вашей перфокартѣ обнаруженъ вирусъ, механизмъ будетъ остановленъ. Всего записей: 1536 | Зарегистр. 19-04-2010 | Отправлено: 18:59 05-06-2011

01MDM Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alexey87 А сам батник где находится? Если на самом компакт-диске, то это проще: Код:   start "" "%~d0pdf\FoxitPDFreader_4.1.1.exe"   Где %~d0 -- корень диска с батником ( например E:\ )   Или придется искать. ---------- Вопросы в личке останутся без ответа Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 19:16 05-06-2011

wolf0425 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Где %~d0 -- корень диска с батником ( например E:\ )   %~d0 - это не корень диска, а буква диска, например E: \ после него лучше не терять, т.е. start "" "%~d0\pdf\FoxitPDFreader_4.1.1.exe"   в таком виде батник может работать из любого каталога того сd. Всего записей: 2928 | Зарегистр. 25-04-2007 | Отправлено: 20:06 05-06-2011 | Исправлено: wolf0425, 20:08 05-06-2011

res2001 Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору AlexanderNON Цитата: Нужно сделать это средствами cmd. Просто примерно год назад я видел здесь такой код, сейчас его найти никак не могу. В папке лежат архивы, которые делались чуть больше года каждый день кроме выходных. нужно оставить только созданные в пятницу Как-то так получается: Код: @set @x=0 /* @echo off set "workdir=G:\Bat\1\"   for /f "tokens=*" %%a in ('dir /a:-d /b /s %workdir%*') do (     for /f "tokens=*" %%b in ('cscript.exe //nologo /e:javascript "%~0" %%~ta') do (         if %%b neq 5 echo del /f /q %%a ))   goto:eof */   var args = WScript.Arguments; var dd = new Date(args(0).substr(6,4),parseInt(args(0).substr(3,2))-1,args(0).substr(0,2)); WScript.echo(dd.getDay()); WScript.quit();   На одном cmd это геморно, по моему. Реализовал через смесь cmd/js, сохраняешь весь код в бат файл и выполняешь. Код рассчитан на использование даты в формате ДД.ММ.ГГГГ Узнать какой у тебя формат можешь выдав команду: echo %date% Если у тебя другой формат - надо переделывать.   Перед запуском настрой переменную workdir в третьей строке - это путь к обрабатываемому каталогу. Обрабатываться будут все файлы из все подкаталогов указанного каталога. Анализируется дата последнего изменения файлов. В таком виде батник ничего не будет удалять - только выводит на экран команды для удаления файлов. Проверишь правильность вывода, если все ок, то в строке if %%b neq 5 echo del /f /q %%a   удали echo и будет удаляться. Всего записей: 2580 | Зарегистр. 11-04-2003 | Отправлено: 20:09 05-06-2011 | Исправлено: res2001, 22:18 05-06-2011

Страницы: 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 104 105 106 107 108

Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Задачи на bat-файлах 10

vu1tur (29-07-2011 12:47): Задачи на bat-файлах 11

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование