Flasher
|
 Posted: Fri May 30, 2014 09:57 Post subject: |
 |
|
garmonist
Что-то вроде того (см. путь к TCFS2): | Code: | ' Параметр: %V
TCFS2 = "%COMMANDER_PATH%\Utils\TCFS2\TCFS2.exe"
Path = WScript.Arguments(0)
With CreateObject("Scripting.FileSystemObject")
If .FileExists(Path) Then Path = .GetParentFolderName(Path)
End With : Path = Mid(Path, InStr(Path, "\\") + 2)
CreateObject("WScript.Shell").Exec TCFS2 & " /ef ""tcd(,`D:\Backup" & _
Mid(Path, InStr(Path, "\")) & "`,S)""" |
Только не соседнее окно, а другая панель. Если же разговор про новую соседнюю вкладку, то там пару символов исправить нужно.
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
