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

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

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

vu1tur (11-09-2007 15:22): продолжаем в теме Задачи на bat-файлах 4  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 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

   

vu1tur



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

 
Важно: копируя батник через буфер обмена из форума не забывайте удалять пробелы в конце каждой строки, т.к. в некоторых случаях из-за этого программа будет работать неправильно!!!
 
Дополняем шапку: добавляем готовые решения, полезные ссылки.
 
Примечание: Большие куски кода заключайте в тэг [more]  
 
Смежные темы:
В помощь системному администратору » Автоматизация администрирования
Программы » Командная строка, батники\сценарии
 
Полезные ссылки
 
Полезные утилиты
 
Готовые решения и частые вопросы:
  • Встроенный справочник по командам
  • Создание помощи по всем командам консоли 2000 и XP
  • Альтернативные решения »
  • Работа с текстом, датой, и файлами »
  • Администрирование, автоматизация и сеть »
  • Работа с переменными и параметрами ком. строки »
     
    Описания работы команд и символов участниками темы:
    · setlocal enabledelayedexpansion и переменные окружения
    · символы & и && в командной строке
    · Переменная %0

  • Всего записей: 3690 | Зарегистр. 01-02-2003 | Отправлено: 11:54 27-04-2007 | Исправлено: Elroir, 03:59 10-09-2007
    Maza Faka



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

    Код:
     
    @echo off
    for /f "tokens=2 delims=*" %%a in ('net user %username%') do set group=%%a & goto :show
    :show
    Echo %username% is %group% member
     

    Всего записей: 1420 | Зарегистр. 25-10-2006 | Отправлено: 10:58 26-07-2007
    01MDM



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

    Цитата:
     
    думаю нужно делать start :метка и дальше идёт скрипт прогресс бара.. пока с фоновом режиме идет заливка дампа
     

     

    Код:
     
    @ECHO OFF
     
    for /l %%i in (0,1,80) do (
        call:COPY
        set /p="#"<nul
        ping -n 3 localhost >nul
    )
    echo.
    del "%temp%\cp.cmd" >nul 2>&1
     
    :COPY
    if exist "%temp%\cp.cmd" goto:eof
    echo copy from to >"%temp%\cp.cmd"
    echo exit >>"%temp%\cp.cmd"
    start %temp%\cp.cmd  
     

     
    Правда прогресс-бар не отражает реальное положение дел, окно cp.cmd можно спрятать

    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 11:04 26-07-2007
    Maza Faka



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

    Цитата:
    сделать прогресс-бар

    Вот пример, как это можно сделать:

    Код:
     
    @Echo off
    Call :Pcopy "d:\Video\Films\movie.avi" c:\new
    goto :eof
     
    :Pcopy
    Set Flagfile=%TEMP%\tmp.tmp
    If Exist %Flagfile% Del %Flagfile%
    start /min copy %* ^& Echo.^> %Flagfile% ^& Exit
    Set /p var=Copying %~1 < NUL
     
    :loop
    Set /p var=. < NUL
    ping -n 1 localhost>nul
    if not exist %Flagfile% goto loop
     

    просто адаптируй под свою задачу.

    Всего записей: 1420 | Зарегистр. 25-10-2006 | Отправлено: 11:09 26-07-2007 | Исправлено: Maza Faka, 11:11 26-07-2007
    01MDM



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    еще после del допиши exit
     
    Добавлено:
    MegaSin
     
    Вот слегка доработал, прогресс будет идти до конца копирования

    Код:
     
    @ECHO OFF
    cls
    echo.
    for /l %%i in (0,1,2) do (
        :progress
        call:COPY
        set /p="#"<nul
        ping -n 2 localhost >nul
        if exist %temp%\cp.tmp goto:progress
    )
    :end
    echo.
    del %temp%\cp.cmd
    goto:eof
     
    :COPY
    if exist %temp%\cp.cmd goto:eof
    cd.>%temp%\cp.tmp
    echo copy "source.file" "destinations" >>"%temp%\cp.cmd"
    echo del "%temp%\cp.tmp" >>"%temp%\cp.cmd"
    echo exit >>"%temp%\cp.cmd"
    start %temp%\cp.cmd
    :: hstart /nowindow "%temp%\cp.cmd"  
     
     

    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 11:15 26-07-2007
    MegaSin

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    вы просто супер!
    Спасибо всем огромное. Буду встраивать

    Всего записей: 25 | Зарегистр. 26-11-2006 | Отправлено: 13:59 26-07-2007
    01MDM



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    MegaSin
    Метку :end убери, она не нужна

    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 16:35 26-07-2007
    Yuki2003



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

    Код:
    For /f "eol=;" %%a In ( List.txt ) Do (
    Set test=%%a
    Echo %%a
    Echo %test )

    Как заставить "работать" Set?
    Echo %%a - OK
    Echo %test - ничего

    Всего записей: 1077 | Зарегистр. 10-07-2003 | Отправлено: 18:20 26-07-2007 | Исправлено: Yuki2003, 18:22 26-07-2007
    KapralBel



    Platinum Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Yuki2003
     For /f "eol=;" %%a In ( List.txt ) Do (
    Set test=%%a
    Echo %%a
    Echo !test! )

    Всего записей: 11354 | Зарегистр. 16-02-2005 | Отправлено: 18:25 26-07-2007 | Исправлено: KapralBel, 18:29 26-07-2007
    MsdLamer

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    помогите пожалуйста решить следующую задачку, средствами Bat файла:  
     
    допусти есть *.txt файлик с текстом
     
    KACCA 1  61,456.91  
    KACCA 1  61,456.91  
    KACCA 2  89,546.95  
    KACCA 2  89,546.95  
     
    строки повторяются.
     
    как сделать так чтобы осталось только
     
    KACCA 1  61,456.91  
    KACCA 2  89,546.95
     
    Только средствами BAT файла.  К зачету надо. Спасибо.  

    Всего записей: 53 | Зарегистр. 26-07-2007 | Отправлено: 18:25 26-07-2007
    Yuki2003



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

    Цитата:
    KapralBel
    !test!

    10х! Ну почему я этого в хэлпе на нашел

    Всего записей: 1077 | Зарегистр. 10-07-2003 | Отправлено: 18:36 26-07-2007
    01MDM



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

    Код:
     
    @ECHO OFF
     
    set etalon=0
    for /f "delims=" %%i in ('type your.txt') do (
        set string=%%i
        call:compare
    )
    goto:eof
     
    :compare
    if "%etalon%"=="%string%" goto:eof
    set etalon=%string%
    echo %string% > new.txt
     

     

    Цитата:
    К зачету надо

    и никаких батников
     

    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 18:52 26-07-2007
    Elroir



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

    Цитата:
    echo %string% > new.txt  

    Надо заменить на echo %string% >> new.txt

    ----------
    "В интернете есть все, но не всегда"

    Всего записей: 2631 | Зарегистр. 05-02-2003 | Отправлено: 18:58 26-07-2007
    MsdLamer

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ВСЕ НОРМАЛЬНО НО, В ФИНАЛЬНОМ ФАЙЛИКЕ ОСТАЕТСЯ ТОЛЬКО:
     
    KACCA 2  89,546.95  
     
    А ГДЕ КАССА1?
     

    Всего записей: 53 | Зарегистр. 26-07-2007 | Отправлено: 19:02 26-07-2007
    Elroir



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

    Цитата:
    ВСЕ НОРМАЛЬНО НО, В ФИНАЛЬНОМ ФАЙЛИКЕ ОСТАЕТСЯ ТОЛЬКО

    Смотри мою поправку выше.
     
    А одинаковые строчки идут одна за другой или вперемешку?

    ----------
    "В интернете есть все, но не всегда"

    Всего записей: 2631 | Зарегистр. 05-02-2003 | Отправлено: 19:04 26-07-2007
    MsdLamer

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    echo %string% > new.txt   ИСПРАВИЛ И ПОЛУЧИЛОСЬ?
     
    KACCA 1  61,456.91    
    KACCA 1  61,456.91    
    KACCA 2  89,546.95    
    KACCA 2  89,546.95
     
    ЧТО-ТО НЕ ТО....
    СТРОКИ ИДУТ ОДНА ЗА ДРУГОЙ

    Всего записей: 53 | Зарегистр. 26-07-2007 | Отправлено: 19:13 26-07-2007
    Elroir



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    MsdLamer
    Скорее всего это из-за пробелов в конце строк.
    Или убери все пробелы или вот чуть измененный код 01MDM:

    Код:
     
    @echo off
    set "etalon=0"  
    for /f "delims=" %%i in ('type kassa.txt') do (  
    set "string=%%i"  
    call :compare  
    )  
    goto :EOF  
    :compare  
    if "%etalon%"=="%string%" goto :EOF  
    set "etalon=%string%"
    echo %string%>>new.txt  
     

    Я просто добавил кавычки, куда надо.

    ----------
    "В интернете есть все, но не всегда"

    Всего записей: 2631 | Зарегистр. 05-02-2003 | Отправлено: 19:19 26-07-2007
    01MDM



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

    Всего записей: 2638 | Зарегистр. 13-02-2006 | Отправлено: 19:22 26-07-2007
    MsdLamer

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    СПАСИБО, выручил очень. Все работет. Еще раз спасибо.

    Всего записей: 53 | Зарегистр. 26-07-2007 | Отправлено: 19:24 26-07-2007
    KapralBel



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

    Цитата:
    Ну почему я этого в хэлпе на нашел

    Set /? >Set.help
    и читаешь файлик Set.help

    Всего записей: 11354 | Зарегистр. 16-02-2005 | Отправлено: 22:01 26-07-2007
    Maza Faka



    Advanced Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    MsdLamer
    Ещё один вариант, учитывает и "перемешанные" строки:

    Код:
     
    @echo off
     
    set text=your.txt
    if exist tmp.tmp del /f /q tmp.tmp
    copy nul tmp.tmp>nul
     
    for /f "delims=" %%a in (%text%) do (
    findstr /c:"%%a" tmp.tmp>nul || echo %%a>> result.txt
    echo %%a>> tmp.tmp
    )
     
    for %%a in (tmp.tmp %text%) do del /f /q "%%a"
    ren result.txt "%text%"
     

     
    Важно: копируя батник через буфер обмена из форума не забывайте удалять пробелы в конце каждой строки, т.к. в некоторых случаях из-за этого программа будет работать неправильно!!!

    Всего записей: 1420 | Зарегистр. 25-10-2006 | Отправлено: 08:22 27-07-2007
       

    Страницы: 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

    Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Закладки » Задачи на bat-файлах 3
    vu1tur (11-09-2007 15:22): продолжаем в теме Задачи на bat-файлах 4


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

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.Board
    © Ru.Board 2000-2020

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru

    Рейтинг.ru