[Igor_I]

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

[gora]

Мне не надо запоминать, мне надо вывести время в файл. »

Немного измените конец скрипта:

Код:

Echo Время выполнения = %delta%с>>filename.txt
Exit

[Creat0R]

Так пойдет? »

Неплохой метод!

Мне не надо запоминать, мне надо вывести время в файл. И чтобы этот скрипт не зависал в консоли, моргая курсором. »

Ну так можно вообще убрать паузу - А в файл записать так:

Код:

Echo %delta%с > file.txt

[Igor_I]

Команда time выдает также доли секунд, как до них добраться, а то по аналогии не получается.

[vserd]

Igor_I, FOR /f "tokens=1-4 delims=:,." %%G IN ('Echo %Time%') DO Echo %%G %%H %%I %%J

[gora]

time выдает также доли секунд, как до них добраться »

C точностью до сотых:

Код:

@Echo off
Call :Sec strt1
rem Здесь размешается исследуемый кусок кода скрипта
Call :Sec strt2
Set /a delta=strt2-strt1
If %delta% LEQ 9 (Set delta=0,0%delta%) Else If %delta% LEQ 99 (Set delta=0,%delta%) Else Set delta=%delta:~0,-2%,%delta:~-2%
Echo Время выполнения = %delta%с>>filename.txt
Exit
:Sec
Set /a %1=360000*%time:~0,2%+6000*1%time:~3,2%+100*1%time:~6,2%+1%time:~9,2%
GoTo :EOF

[Igor_I]

Код:

@Echo off
Call :Sec strt1
"C:\Program Files\dd-0.5\dd.exe" if="L:\10.avi" of="N:\102.avi"
Call :Sec strt2
Set /a delta=strt2-strt1
If %delta% LEQ 9 (Set delta=0,0%delta%) Else If %delta% LEQ 99 (Set delta=0,%delta%) Else Set delta=%delta:~0,-2%,%delta:~-2%
Echo Время выполнения = %delta%с >> E:\times.txt
:Sec
Set /a %1=360000*%time:~0,2%+6000*%time:~3,2%+100*%time:~6,2%+%time:~9,2%
GoTo :EOF

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

[gora]

Set /a %1=360000*%time:~0,2%+6000*%time:~3,2%+100*%time:~6,2%+%time:~9,2% »

Это Вы зря изменили, будут ошибки когда минуты, или секунды, или сотые доли секунд будут иметь значение меньше 10 (т.е., 04, например). В моем коде этой ошибки не будет.

[dimetrius91182]

Подскажите что не так? В таком виде работает все кроме последний строчки (не очищается папка)
Желательно очищение папки, лучшем вариантом полное уничтожение папки

WShell.Run "loaddrv.exe -stop AMON", 0, True
WShell.Run "loaddrv.exe -stop nod32drv", 0, True
WShell.Run "loaddrv.exe -remove AMON", 0, True
WShell.Run "loaddrv.exe -remove nod32drv", 0, True
WShell.Run "cmd.exe /c del /f %systemroot%\system32\drivers\amon.sys" , 0, True
WShell.Run "cmd.exe /c del /f %systemroot%\system32\drivers\nod32drv.sys" , 0, True
WShell.Run "cmd.exe /c del /f %systemroot%\system32\imon.dll" , 0, True

WShell.Run "cmd.exe /c del /f %UserProfile%\Nod32_Portable\.*" , 0, True

[Igor_I]

gora, ну что Вы сударь, можно и на ты.
Не согласен. Перевёл часы на 0. В течении первой минуты, по вашему варианту- 611434 , по моему - 5337.