» Задачи на bat-файлах 8

Цитата:

вот специально скачал с той страницы

вот специально скачал тот файл ещё раз.
Как не создавал current.exe >file никакого файла так и не создает.
Может ещё кто проверит?

вообще идея выкладывать непосредсвенно экзешники - порочна по сути, особенно когда у всех них размер одинаковый. быстро проверить то ли скачалось - сложно, ни дату/время не назовешь ни CRC нет. полезнее зиповать.
кстати о хэше - md5:debee9760a058d75841e25bae032adef


ps: а такие простыни - в [ more][ /more] заворачивать лучше сразу.

у меня винда оригинальная, у тебя может какая нибуть самопальная из которой выкинули лишнее

Добавлено:
ну какой тут хеш, не смеши людей - 2 кб с ошибкой скачались. у тебя буфер больше 2 кб для скачивания

Цитата:

у тебя может какая нибуть самопальная из которой выкинули лишнее

1. ОЕМ версия - работает.
2. винда - обычная XP PRO corp SP3 eng

ну если те работают а эта нет - какой можно ввывод сделать

Добавлено:
invoke CharToOem, addr buffer, addr String
они одной строкой различаются

Цитата:

ну какой тут хеш, не смеши людей - 2 кб с ошибкой скачались. у тебя буфер больше 2 кб для скачивания

и при чем тут размер буфера, если на народе заглючит прокси?
В 99% случаях хэш нужен не для отлова ошибок скачки, а для отлова ситуаций "совсем не то содержимое"

за последние пять лет у меня два раза файл скачался с ошибкой - сеть барахлила, у меня даже прог нету чтоб мд5 считать

Цитата:

у меня даже прог нету чтоб мд5 считать

зазипуй и выложи зип, плз.

CURRENT.ZIP 870 байт (870 байт)


Добавлено:
может байты переписать в ручную?

Добавлено:
картинка 40 кб весила не меньше

Добавлено:
это еще фигня, я последнюю 16 битную прогу в архив ложил архив больше весил чем прога сама

Добавлено:
из за зип заголовка, а сжимать там нечего было, ну может пара нулей

Добавлено:
по байтам и тактам наверно одинаково
mov ax,1
и
xor ax,ax
mov al,1
нет наверно второе на два нуля меньше но на такт больше

Цитата:

может байты переписать в ручную?

да бесполезняк, файлик действительно совпадает, и по прежнему ничего не пишет.

Цитата:

нет наверно второе на два нуля меньше но на такт больше

угу, а ещё и не распараллеливается, наверно.
абстрактно взятое из мануала x86 "на такт больше" перестало рулить во времена первых пентиумов, когда перестановка команд местами начала влиять на скорость выполнения.
сейчас этим проще не заморачиваться - все равно фиг угадаешь, оптимизируй на размер лучше.

А что - программа писалась на асме что ли?
выложи куда-нить исходник и напиши с какими ключами чем компилил, а?

ENHANCER.ZIP 315 КБ (323 391 байт)

bomzzz
скрывайте, пожалуйста, большие сообщения в тег [no][more=Читать дальше..]Текст[/more][/no]

допишу скрою

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

Всех приветствую.
Пытался помочь в теме Как найти файлы, путь к которым превышает 256 символов? и для этого пытался воспользоваться советом, данным NIKZZZZ по определению длины переменной: http://forum.ru-board.com/topic.cgi?forum=62&topic=19668&start=2660#4 . Но в цикле For переходы GoTo завершают цикл, т. е. только первая переменная обрабатывается. Что, так и должно быть? Нельзя в For использовать GoTo? Или я где-то перемудрил?

Добавлено:

Код: ChDir .>C:\1.Txt
SetLocal EnableDelayedExpansion
For /F "Tokens=* UseBackQ" %%0 In (`Dir "C:\*.*" /A-D /B /O:N /S`) Do (
    Set Var=%%~P0
    Set Count=0
    :0
    If "!Var!"=="" GoTo :1
    Set Var=!Var:~0,-1!
    Set /A Count+=1
    GoTo :0
    :1
    Echo Length=!Count!>>C:\1.Txt
    Echo %%0>>C:\1.Txt
    )

не попадалось еще таких длинных путей чтоб батники не справлялись. переведи путь в короткий может так проблема решится.

bomzzz
Это не у меня проблема. И у меня нет таких путей. Цикл спотыкается на обычных файлах с небольшим путём.

Столкнулся с такой проблемой.
Пытаюсь создать bat для создания определённого задания в системном планировщике Windows.

Пример задания:

Код: schtasks /create /sc hourly /mo 1 /st 00:00:00 /tn "Start" /tr "D:\Total Commander\TOTALCMD.EXE" /ru System

HA3APET
А если вручную подредактировать?

BVV63
Вручную всё можно.
Но нужен батник.
Перелопатил кучу форумов ответа не нашёл. Может тут есть гуру, которые знают ответ.

Schtasks очень важная утилита для системных администраторов, обслуживания ОС, неужели Microsoft в WinXP не предусмотрела в ней создание задания путь к исполняемому файлу которого содержит пробел. А в последующих ОС исправила.

Добавлено:
Нашёл выход, но немного не удобно.
Нужно выполнять батник из папки с исполняемым файлом для нашего задания:

Цитата:

schtasks /create /sc hourly /mo 1 /st 00:00:00 /tn "Start" /tr ".\TOTALCMD.EXE" /ru System

И тогда при его выполнении в планировщике получается полный путь к TOTALCMD.EXE заключённый в кавычки как и надо.

HA3APET

Код:
... /tr "\"D:\Total Commander\TOTALCMD.EXE"\" /ru System

HA3APET
так должно работать в XP

Код: schtasks /create /sc hourly /mo 1 /st 00:00:00 /tn "Start" /tr """D:\Total" "Commander\TOTALCMD.EXE""" /ru System

igor_andreev

Спасибо!
Подскажите пожалуйста справку где вы это нашли.

BVV63
Цитата:

Что, так и должно быть? Нельзя в For использовать GoTo?

ага, нельзя.
если очень хочется - выноси наружу, через call :metka

bomzzz

Цитата:

не попадалось еще таких длинных путей чтоб батники не справлялись.

а какие проблемы создать их для проверки?
перевод в короткие имена доступен не всегда и их длину превысить в общем-то непринципиально сложнее.

у меня почему-то впечатление, что при длинных путях у BVV63 просто DIR ругнется, xxx is too long

да там кажется надо просто путь на части разбить. кажется все таки было такое когда кеш мазилы удалял

Добавлено:
в винде буфер 32 кбайта под анси и 64 кб для юникода, причем можно сжулить и записать анси путь в буфер размером для юникода. а в досе даже не помню сколько максимум

Добавлено:
а может OutLook-а не помню уже

Добавлено:
наверно и там и там, специально так делают, чтоб вирусам туда было сложнее забраться. и еще папка со случайным именем, но батник туда в одну строчку забирается, так что зря старались

wolf0425

Цитата:

если очень хочется - выноси наружу, через call :metka

Попробовал:

Код: ChDir .>1.Txt
SetLocal EnableDelayedExpansion
For /F "Tokens=* UseBackQ" %%0 In (`Dir "E:\2\*.*" /A-D /B /O:N /S`) Do (
    Set Var=%%~F0
    Set FileName=%%~F0
    Set Count=0
    Call :1
:0
    Echo .>Nul
    )
Exit
:1
If "!Var!"=="" Echo !Count!>>1.Txt & GoTo :0
Set Var=!Var:~0,-1!
Set /A Count+=1
GoTo :1

в шапке утилит для винды целый склад. самая лучшая на мой взгляд WBAT она для доса. окна ее для батников приемлимы, создаются легко, мышью управляются и всех видов, весит она всего 15 кб. хотя я смотря автор для винды тоже налепил кое чего.
http://home.mnet-online.de/horst.muc/main.htm

Добавлено:
все она может и директории распечатывать и двух оконные менеджеры файлов делать


Добавлено:
шикарное оформление для батника

BVV63
Цитата:

Попробовал:

не вижу. что у тебя там :0 внутри цикла делает?

примерно так это пишется:

Код: @echo off

chdir .>1.txt

for /f "tokens=*" %%a in ('dir ".\*" /a-d /b /o:n /s') do call :_count "%%~a"
exit

:_count
set count=0
set var=%~1
:_loop
set var=%var:~0,-1%
set /a count += 1
if "%var%" neq "" goto :_loop
1>>1.txt echo.%count%
exit /b

рубордовцы!!! подскажите плиз почему у меня батник на цикл не уходит.... прогоняет все и после завершения копирования выходит

Код: @echo off
cls
setlocal enabledelayedexpansion
set num=0
:loop
echo y | format A: /q /v:disk!num!
copy /v F:\stop\*.* A:\
echo Need format and copy any diskette (Y | N)?
pause > nul
set /p answ=
if /i "%answ%"=="y" goto loop
echo FINISHED...
endlocal

я все понять не могу, зачем тебе столько дискет форматировать

Добавлено:
чтоб записать файлы на группу дискет специальная программка есть, которая делит файлы

Добавлено:
где ты столько дискет надыбал, я в магазине спрашивал, сказали могут привезти под заказ если я коробку возьму, а каждая стоит больше 100 рублей... а у меня флоппи не работает

kurbat
происходит ошибка и выполнение прерывается

Код: echo Need format and copy any diskette (Y ^| N)?

ну а зачем в виртуальном такое городить

Добавлено:



Добавлено:
если учесть что новый двд привод стоит 1000 руп, покупка коробки флоппи дискет предприятие сомнительное. а когда я недавно прочитал в книжке что скорость считывание с дискет 60 кб в сек чета меня уже и интересовать перестало, почему флопик у меня не работает