View previous topic :: View next topic |
Author |
Message |
d-view

Joined: 25 Jul 2006 Posts: 232 Location: xUSSR
|
(Separately) Posted: Thu Jul 27, 2006 16:44 Post subject: Плагин для восстановления файлов?! |
|
|
Хотелось бы знать, существует ли плагин к тоталу для восстановления поврежденных файлов с любых носителей?
Желательно чтобы являлся аналогом программы CDCheck, оф.сайт - http://www.kvipu.com/CDCheck/ _________________ Вы слишком много знаете... Вас отягощает эрудиция |
|
Back to top |
|
 |
Lamer
Joined: 20 Mar 2006 Posts: 522
|
|
Back to top |
|
 |
Моторокер

Joined: 06 May 2005 Posts: 1517 Location: г. Пермь (читается Перьмь)
|
(Separately) Posted: Fri Jul 28, 2006 07:36 Post subject: |
|
|
Для KillCopy есть архиплагин.
Интерфейс программы конечно ужасный – налеплено всего.
Лучше уж действительно Non-Stop Copy _________________ плагины для Total Commander, статьи Graphics Converter; NSCopy; SEO HTML; KillOK; Плагин на Delphi
ПармаСруб - строительство домов и бань в Перми |
|
Back to top |
|
 |
d-view

Joined: 25 Jul 2006 Posts: 232 Location: xUSSR
|
(Separately) Posted: Fri Jul 28, 2006 10:55 Post subject: |
|
|
Спасибо!
Прикольная программка, но это не то..
Хотелось бы именно плагин, причем со следующими требованиями:
1. Автоматический запуск по истечении заданного времени, в ходе которого не происходит копирование..
2. Восстановление файла плагином в ту же директорию, куда и копирование..
Учитывая изложенное, в идеале желательно чтобы он включался на сбойном месте и по проходу его снова отключался, а все копирование файла шло не прерываясь, то есть плагин работал опционально просто как расширение функций копирования.. _________________ Вы слишком много знаете... Вас отягощает эрудиция |
|
Back to top |
|
 |
Maximus

Joined: 07 Apr 2005 Posts: 927 Location: Украина, Кировоградская обл., г. Знаменка
|
|
Back to top |
|
 |
d-view

Joined: 25 Jul 2006 Posts: 232 Location: xUSSR
|
(Separately) Posted: Fri Jul 28, 2006 11:21 Post subject: |
|
|
Жалко..
А Non-Stop Copy 1.04 можно присобачить так, чтобы она запускалась по истечении заданного времени, в ходе которого не происходит копирование.?!
Или какую-нибудь другую программу? _________________ Вы слишком много знаете... Вас отягощает эрудиция |
|
Back to top |
|
 |
Моторокер

Joined: 06 May 2005 Posts: 1517 Location: г. Пермь (читается Перьмь)
|
(Separately) Posted: Fri Jul 28, 2006 11:28 Post subject: |
|
|
Да легко!
Пишешь архиваторный плагин, копируешь как тебе надо, а хочешь мульку левую вызывай.
Либо создаёшь им bat файл с вызовами мульки-копировщика, того же NSCopy, тогда копирование даже в фоне получится.
Только придётся все варианты предусмотреть, которые Total обрабатывает сам – заменить/заменить всё/переименовать и т.д.
Конечно не будет опционально вызываться, сам будешь вызывать, когда один из файлов не скопируется.
2. Нельзя разве в параметрах передать нужную (на противоположной панели) папку автоматом, перетащив на кнопку? не силён во всяких %L, %R и проч. параметрах кнопок Totala _________________ плагины для Total Commander, статьи Graphics Converter; NSCopy; SEO HTML; KillOK; Плагин на Delphi
ПармаСруб - строительство домов и бань в Перми |
|
Back to top |
|
 |
d-view

Joined: 25 Jul 2006 Posts: 232 Location: xUSSR
|
(Separately) Posted: Fri Jul 28, 2006 11:33 Post subject: |
|
|
Перетащить можно все, но хочется как можно меньше ручками..
А писать плугины я не умею..  _________________ Вы слишком много знаете... Вас отягощает эрудиция |
|
Back to top |
|
 |
Lamer
Joined: 20 Mar 2006 Posts: 522
|
(Separately) Posted: Fri Jul 28, 2006 13:15 Post subject: |
|
|
d-view wrote: | А писать плугины я не умею..  |
Тогда жди,пока напишет тот,кто умеет.Иначе не получится.
Лично мне более,чем достаточно NSCopy в меню "Запуск" c параметрами %P%N %T%N. Даже хоткей назначать не стал,хотя мог бы.Плагинчик то в принципе элементарный,вот только зачем он нужен,когда внешняя прога прекрасно привешивается на хоткеи и ловит все пути.А с автоматизацией и наворотами,как уже и ответили, не выйдет. |
|
Back to top |
|
 |
d-view

Joined: 25 Jul 2006 Posts: 232 Location: xUSSR
|
(Separately) Posted: Fri Jul 28, 2006 14:06 Post subject: |
|
|
Спасибо!
Усе вроде работает..
Code: | TOTALCMD#BAR#DATA
C:\Program Files\Total Commander XP\Utils\NonStopCopy\nscopy.exe
%P%N %T%N
C:\Program Files\Total Commander XP\Utils\NonStopCopy\nscopy.exe
Non-Stop Copy
C:\Program Files\Total Commander XP\Utils\NonStopCopy\
-1
|
Хотя нет.. Почему когда я стою на папке, то выдает ошибку?!
 _________________ Вы слишком много знаете... Вас отягощает эрудиция |
|
Back to top |
|
 |
Lamer
Joined: 20 Mar 2006 Posts: 522
|
(Separately) Posted: Fri Jul 28, 2006 16:35 Post subject: |
|
|
А папки напрямую nscopy.exe отродясь копировать не умела.Это прихоть автора и для её обхода надо по идее применять написанный им же батник.Поскольку батник туговато цепляется к Totaly, можно либо копировать файлы поодиночке,либо модифицировать батник ,либо попросить помощи у наших скриптописателей.Я думаю на основе скрипта,изначально написанного для Winampa, получится самое то. |
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2224 Location: Москва, Россия
|
(Separately) Posted: Fri Jul 28, 2006 16:40 Post subject: |
|
|
Не хочу скачивать NonStopCopy.
Покажите батник. Сделаю vbs-скрипт что называется "по мотивам"  _________________ Нет, я не сплю. Я просто медленно моргаю. |
|
Back to top |
|
 |
Lamer
Joined: 20 Mar 2006 Posts: 522
|
(Separately) Posted: Fri Jul 28, 2006 17:07 Post subject: |
|
|
Code: |
@ECHO OFF
IF "%OS%"=="Windows_NT" GOTO winver_ok
ECHO This batch file requires Windows NT4/2K/XP or higher.
GOTO end
:winver_ok
IF {%1}=={} GOTO help
IF {%2}=={} GOTO help
IF {%1}=={/?} GOTO help
IF {%1}=={\?} GOTO help
GOTO start
:help
ECHO.
ECHO Использование:
ECHO nscopyd.bat {SourcePath} {DestPath} [Parameters]
ECHO Где:
ECHO {DestPath} - имя каталога в который будет скопировано содержимое
ECHO каталога{SourcePath}
ECHO [Parameters] - Дополнительные параметры, которые будут переданы NSCopy
ECHO.
GOTO end
:start
REM Проверка на рекурсивный вызов
IF NOT {%__BATCHNAME%}=={} GOTO recursion
REM Начало выполнения
SET __BATCHNAME="%~0"
SET __NSCOPY_PATH=%~dp0
SET __ARGS=%3 %4 %5 %6 %7 %8 %9
IF NOT EXIST "%__NSCOPY_PATH%nscopy.exe" (
ECHO ERROR: "%__NSCOPY_PATH%nscopy.exe" not found.
GOTO end
)
FOR %%I IN ("%~1\") DO SET SOURCE_PATH="%%~fdpI"
FOR %%I IN ("%~2\") DO SET DEST_PATH="%%~fdpI"
IF NOT EXIST %SOURCE_PATH% (
ECHO ERROR: Path %SOURCE_PATH% not found.
GOTO end
)
CALL %__BATCHNAME% %SOURCE_PATH% %DEST_PATH%
GOTO end
REM Рекурсия
:recursion
PUSHD "%~1%~3"
IF NOT EXIST "%~2%~3" (
MKDIR "%~2%~3" 1>nul 2>nul
IF ERRORLEVEL 1 (
ECHO ERROR: Can't create directory "%~2%~3".
MKDIR "%~2%~3"
POPD
GOTO end
)
)
FOR /F "delims=" %%I IN ('DIR /B /A:-D') DO (
ECHO Copying "%%~fI" to "%~2%~3%%~I"
START /B /MIN /WAIT /D"%__NSCOPY_PATH%" nscopy.exe "%%~fI" "%~2%~3%%~I" /e %__ARGS%
)
FOR /F "delims=" %%I IN ('DIR /B /A:D') DO CALL %__BATCHNAME% %1 %2 "%~3%%~I\"
POPD
:end
|
|
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2224 Location: Москва, Россия
|
(Separately) Posted: Fri Jul 28, 2006 18:48 Post subject: |
|
|
Блин, проверить некогда - надо бежать.
Code: | Dim FSO, TCS, StreamFile, WSH
Set FSO = CreateObject("Scripting.FileSystemObject")
Set TCS = CreateObject("TCScript.Helper")
Set WSH = CreateObject("WScript.Shell")
Set StreamFile = FSO.OpenTextFile(WScript.Arguments(1), 1)
Dim Selected, Exe, Arg, Args
Exe = Wscript.Arguments(0)
For i = 3 To Wscript.Arguments.Count
Args = Args & " " & Wscript.Arguments(i - 1)
Next
Do While Not StreamFile.AtEndOfStream
Selected = StreamFile.ReadLine
If FSO.FileExists(Selected) Then
WSH.Run Exe & Selected & Args
End If
If FSO.FolderExists(Selected) Then
FolderProcess(FSO.GetFolder(Selected))
End If
Loop
MsgBox("Выполнено!")
Set FSO = Nothing
Set TCS = Nothing
Set StreamFile = Nothing
Wscript.Quit()
Function FolderProcess(CurrFolder)
Dim sf, f
For Each sf in CurrFolder.SubFolders
FolderProcess(sf)
Next
For Each f in CurrFolder.Files
WSH.Run Exe & Selected & Args
Next
End Function |
Сохранить с расширением vbs, например, startset.vbs.
Запускать:
startset.vbs {Путь\nscopy.exe} %L %T {Параметры} |
|
Back to top |
|
 |
A.N.T.

Joined: 01 Jul 2006 Posts: 190
|
(Separately) Posted: Sat Jul 29, 2006 16:02 Post subject: |
|
|
При попытке скопировать папку:
Code: | Сценарий: NSCopyStart.vbs
Строка: 33
Символ: 5
Ошибка: Не удаётся найти указанный файл.
|
При попытке скопировать файл:
Code: | Сценарий: NSCopyStart.vbs
Строка: 15
Символ: 5
Ошибка: Не удаётся найти указанный файл.
|
|
|
Back to top |
|
 |
|