Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для NickM

Ветеран


Contributor


Сообщения: 4626
Благодарности: 1110

Профиль | Отправить PM | Цитировать


Цитата denis19:
Это же просто появляется окошко с копированным путём. »
Ну так ведь это пример для Вас!

Цитата denis19:
Если это надо куда то в мой вставить-заменить, то всяко пробовал, ошибки выдаёт. »
Так покажите, что и куда Вы вставляли?

Цитата denis19:
Подскажите куда ставить? »
Ну, например, так:
Код: Выделить весь код
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
Цитата denis19:
А как же, конечно уверен. »
Тогда этого быть не должно:
Цитата denis19:
но всплывает ошибка. Иногда бывает без ошибки, но это редко. »

Последний раз редактировалось NickM, 08-06-2023 в 15:18.


Отправлено: 13:10, 08-06-2023 | #7