Total Commander (часть 9) - [1642] :: Программы :: Компьютерный форум Ru.Board

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?

Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация

Компьютерный форум Ru.Board » Компьютеры » Программы » Total Commander (часть 9)

Модерирует : gyra, Maz
Maz (11-07-2018 20:27): Total Commander (часть 10)	Версия для печати • Подписаться • Добавить в закладки
На первую страницу • к этому сообщению • к последнему сообщению

Skif_off

Gold Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Код:

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\Script.vbs
%V
cmd.exe
Некий батник

-1

Script.vbs:

Код:

Dim sCP
Set objShellApp = CreateObject("Shell.Application")
Set WshShell = CreateObject("Wscript.Shell")

sCP = WshShell.ExpandEnvironmentStrings("%COMMANDER_PATH%")

objShellApp.ShellExecute sCP & "\Utils\Script.cmd", """" & WScript.Arguments.Item(0) & """", sCP & "\Utils", "runas", 1

О параметрах ShellExecute см. здесь.

Всего записей: 6489 | Зарегистр. 28-01-2008 | Отправлено: 03:34 21-12-2016 | Исправлено: Skif_off, 03:38 21-12-2016

На первую страницу • к этому сообщению • к последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Программы » Total Commander (часть 9)
Maz (11-07-2018 20:27): Total Commander (часть 10)

Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC