Flasher
|
 Posted: Sun May 05, 2013 18:54 Post subject: |
 |
|
Ciber SLasH, скриптом, может?:
| Code: | '============================================================================
' Распаковать двойной архив в папку с базовым именем архива
' Параметры: %V "<путь получателя: %P/%T>"
'============================================================================
Z7 = """%COMMANDER_PATH%\Utils\7-Zip\7z.exe""" : Set A = WScript.Arguments
With CreateObject("Scripting.FileSystemObject")
BN1 = .GetBaseName(A(0)) : BN2 = .GetBaseName(BN1) : End With
With CreateObject("WScript.Shell")
.Run Z7 & " x """ & A(0) & """ -o""%TEMP%"" -y", 0, True
.Run Z7 & " x ""%TEMP%\" & BN1 & """ -o""" & A(1) & BN2 & "\"" -y", 0, True
.SendKeys "^R" : .Run "cmd /c del ""%TEMP%\" & BN1 & """", 0
End With |
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
