Обсуждение темы "Обмен кнопками"
Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер
-
happywanderer
- Сообщения: 57
- Зарегистрирован: Вт окт 06, 2009 21:13
happywanderer
В общем, кое-что нашёл:
Control_folders.vbs:+ Прога.
ЗЫ: Желательно доложить о результате.
В общем, кое-что нашёл:
Control_folders.vbs:
Код: Выделить всё
' Открыть и выдвинуть диалог "Свойства папки" на передний план
' Параметры: <относительный путь к проге в папке TC>
' Пример: Tools\WinActiv\WinActiv.exe
'===========================================
With CreateObject("WScript.Shell")
.Run"RunDll32.exe shell32.dll,Options_RunDLL",1,True
.Run""""&.ExpandEnvironmentStrings("%Commander_Path%")&_
"\"&WScript.Arguments(0)&""" ""Свойства папки""",0
End WithЗЫ: Желательно доложить о результате.
Последний раз редактировалось Flasher Вт фев 01, 2011 15:14, всего редактировалось 2 раза.
Avada
Ну, тогда - на здоровье.
Заодно спрошу, у тебя нижний скрипт тоже не срабатывал?
+: убрал 6 лишних
.
Ну, тогда - на здоровье.
Заодно спрошу, у тебя нижний скрипт тоже не срабатывал?
+: убрал 6 лишних
.-
happywanderer
- Сообщения: 57
- Зарегистрирован: Вт окт 06, 2009 21:13
Может у меня руки кривоваты, но со свойством папки выходит вот это окно:

что не так делаю?
Скрипт вот:

что не так делаю?
Скрипт вот:
Последний раз редактировалось happywanderer Ср фев 02, 2011 12:12, всего редактировалось 1 раз.
-
happywanderer
- Сообщения: 57
- Зарегистрирован: Вт окт 06, 2009 21:13
happywanderer писал(а):Я скрипт запускаю не из под ТОТАЛА.
Название топика прочти.
Качаешь программу, кидаешь exe-шник в каталог/подкаталог ТС, тянешь скрипт на тулбар, жмёшь на кн. ПКМ и "Изменить", в поле "Параметры" вписываешь относительный путь к проге, жмёшь ОК.
-
happywanderer
- Сообщения: 57
- Зарегистрирован: Вт окт 06, 2009 21:13
Ещё раз:
Flasher писал(а):Код: Выделить всё
' Параметры: <относительный путь к проге в папке TC> ' Пример: Tools\WinActiv\WinActiv.exe
Скрипт можно использовать только из под ТС.happywanderer писал(а):я имел ввиду что даже при запуске не из под ТОТАЛА эта ошибка вылскакивает.
happywanderer
Для твоей кнопки в скрипте нужно вместо
написать
Для твоей кнопки в скрипте нужно вместо
Код: Выделить всё
.Run""""&.ExpandEnvironmentStrings("%Commander_Path%")&_
"\"&WScript.Arguments(0)&""" ""Свойства папки""",0 Код: Выделить всё
.Run""""&.ExpandEnvironmentStrings(WScript.Arguments(0))&""" ""Свойства папки""",0 Нет, я не сплю. Я просто медленно моргаю.