Flasher
Не подумал бы что такую простую вещь он не исправил за столько лет существования командера.
Спасибо за скрипт. Буду копаться.
Кнопки для 7-Zip
Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер
Tol!k, за долгое время использования внезапно обнаружил, что твой батник не распаковывает архивы внутри каталогов с кириллическими именами или это только у меня одного так?
Можно это дело починить без ущерба прежнему функционалу? Ибо батник крайне нужен, вся распаковка на нем висит.
Можно это дело починить без ущерба прежнему функционалу? Ибо батник крайне нужен, вся распаковка на нем висит.
vbyen
Если нужно распаковывать в папки рядом с архивами, то можно ещё мой скрипт использовать.
Если нужно распаковывать в папки рядом с архивами, то можно ещё мой скрипт использовать.
Flasher, спасибо, великолепный скрипт!
Единственное, можно подсказку - что в коде нужно изменить, чтобы сделать второй вариант скрипта (или доработку этого) для пакетной простой распаковки (не в одноименные каталоги)?
Это где-то здесь?
Единственное, можно подсказку - что в коде нужно изменить, чтобы сделать второй вариант скрипта (или доработку этого) для пакетной простой распаковки (не в одноименные каталоги)?
Это где-то здесь?
Код: Выделить всё
WSH.Run """" & Proga & """ x """ & File & """ -o""" & NF & """ -y", 0, Truevbyen
Поменятьна
Поменять
Код: Выделить всё
NF = FSO.CreateFolder(FSO.GetParentFolderName(File) & "\" & FSO.GetBaseName(File) & "\" )
WSH.Run """" & Proga & """ x """ & File & """ -o""" & NF & """ -y", 0, True Код: Выделить всё
WSH.Run """" & Proga & """ x """ & File & """ -o""" & FSO.GetParentFolderName(File) & "\"" -y", 0, TrueFlasher, еще раз спасибо! Фикс кода сработал на ура.
И к слову, этот вариант скрипта у меня вел себя своеобразно - мгновенно после запуска радостно сообщал "Распаковка завершена!" соответственно без всякой распаковки)
Iori, да вроде как очевидно, что дело не в конкретных архивах. Вероятно, баг работы Толиного батника имеет мой частный характер (никто ведь еще не жаловался на его неработоспособность). Недавно чинил сбой в системных шрифтах после установки/сноса одного кривого ПО - возможно, в этом причина ранее указанного бага с кириллическими именами каталогов.
И к слову, этот вариант скрипта у меня вел себя своеобразно - мгновенно после запуска радостно сообщал "Распаковка завершена!" соответственно без всякой распаковки)
Iori, да вроде как очевидно, что дело не в конкретных архивах. Вероятно, баг работы Толиного батника имеет мой частный характер (никто ведь еще не жаловался на его неработоспособность). Недавно чинил сбой в системных шрифтах после установки/сноса одного кривого ПО - возможно, в этом причина ранее указанного бага с кириллическими именами каталогов.
vbyen
Фишка в том, чтобы во время распаковки можно было заниматься своими делами, не отвлекаясь на работу утилиты. Особенно актуально при большом кол-ве архивов и их размере. Уведомления для этого достаточно. А в данном случае нельзя подвязать все процессы к одному прогрессу. Много сменяющихся окон/иконок с разными показаниями будут нервировать куда больше.
И с вопросом стоило бы обращаться по месту расположения скрипта.
Фишка в том, чтобы во время распаковки можно было заниматься своими делами, не отвлекаясь на работу утилиты. Особенно актуально при большом кол-ве архивов и их размере. Уведомления для этого достаточно. А в данном случае нельзя подвязать все процессы к одному прогрессу. Много сменяющихся окон/иконок с разными показаниями будут нервировать куда больше.
И с вопросом стоило бы обращаться по месту расположения скрипта.
Ок, кривоватый самофикс)
Любой легкий экзешник запускается свернутым в начале распаковки
И в конце распаковки прибивается
В качестве индикации вроде безглючно работает
p.s. на скрипт повесил пустой консольный exe, а потом задним числом подумал, что в него можно было и простенькую 8-бит муз. тему вставить.
На любителя, конечно)
Любой легкий экзешник запускается свернутым в начале распаковки
Код: Выделить всё
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "%COMMANDER_PATH%\Soft\Utils\archivers\file.exe",7Код: Выделить всё
WshShell.Run "taskkill /IM file.exe", 0p.s. на скрипт повесил пустой консольный exe, а потом задним числом подумал, что в него можно было и простенькую 8-бит муз. тему вставить.
На любителя, конечно)