[NickM]

Вы уверены, что в clip всегда окажется путь до программы?

Не исключено, что закрывать указанный объект Вам следует на последнем этапе, уже после запуска программы.

На этапе отладки отслеживайте/ мониторьте/ проверяйте/ наблюдайте значение clip и возможно Вы увидите, что в переменной не всегда то, что ожидается.

[Sham]

обычно берётся через объект htmlfile

Код:

clip = CreateObject("htmlfile").parentWindow.clipboardData.getData("Text")
MsgBox(clip)

[DJ Mogarych]

Powershell

script.ps1

Код:

if (Test-Path (Get-Clipboard)) {start $path}

Ярлык для запуска

Код:

powershell -f "D:\temp\script.ps1"

[NickM]

Powershell »

, раздел ведь VBS/WSH/JS

[denis19]

Вы уверены, что в clip всегда окажется путь до программы? »

А как же, конечно уверен.

clip = CreateObject("htmlfile").parentWindow.clipboardData.getData("Text") MsgBox(clip) »

Это же просто появляется окошко с копированным путём. Если это надо куда то в мой вставить-заменить, то всяко пробовал, ошибки выдаёт. Подскажите куда ставить?

[NickM]

Это же просто появляется окошко с копированным путём. »

Ну так ведь это пример для Вас!

Если это надо куда то в мой вставить-заменить, то всяко пробовал, ошибки выдаёт. »

Так покажите, что и куда Вы вставляли?

Подскажите куда ставить? »

Ну, например, так:

Код:

set fso = CreateObject("Scripting.FileSystemObject")
clip = CreateObject("htmlfile").parentWindow.clipboardData.getData("Text")
if (fso.FileExists(clip)) Then
Set WshShell = CreateObject("WScript.Shell")
RetCode = WshShell.Run(clip, 1, True)
end if

А как же, конечно уверен. »

Тогда этого быть не должно:

но всплывает ошибка. Иногда бывает без ошибки, но это редко. »

[DJ Mogarych]

раздел ведь VBS/WSH/JS »

Только потому, что у автора был такой исходный скрипт. Но если это принципиально, извините.

[denis19]

Ну, например, так: »

Ошибка всё равно всплывает. Надо убирать цифру в конце. Вот так запускает.
clip = CreateObject("htmlfile").parentWindow.clipboardData.getData("Text")
MsgBox(clip)
Set WshShell = CreateObject("WScript.Shell")
RetCode = WshShell.Run(clip, True)

[NickM]

Надо убирать цифру в конце. Вот так запускает. »

Так Вы какое приложение пытаетесь запустить?

3.4. Run Синтаксис: Run(<Command>,<WindowStyle>,<WaitOnReturn>) Назначение: создаёт новый независимый процесс, который запускает заданное приложение. Параметры: <Command> - строка, командная строка запуска приложения. <WindowStyle> - необязательный, число. Определяет вид окна запускаемого приложения. Некоторые возможные значения: 0 - Не отображает окно. 1 - Активизирует и отображает окно. 2 - Активизирует окно и отображает его в свёрнутом виде. 3 - Активизирует окно и отображает его в максимизированном виде. <WaitOnReturn> - необязательный, булево (число). True - сценарий возобновит работу только после завершения вызванного процесса. False (по умолчанию) - управление передаётся сразу обратно в сценарий. Описание: если параметр "WaitOnReturn" установлен в True, метод возвращает код выхода вызванного приложения. Иначе метод всегда возвращает ноль.

При передаче параметров в процедуру/ функцию следует соблюдать их порядок и количество.

Т.е. Вы ошибочно предполагаете, что опустили второй параметр.