View previous topic :: View next topic |
Author |
Message |
Roz
Joined: 14 Jan 2005 Posts: 9
|
(Separately) Posted: Mon Sep 12, 2005 23:18 Post subject: Не работают скрипты, нужен совет. |
|
|
Вот так ругается как исправить можно?
Script: C:\Program Files\Total Commander\Data.vbs
Line: 9
Char: 1
Error: ActiveX component can't create object: 'Scripting.FileSystemObject'
Code: 800A01AD
Source: Microsoft VBScript runtime error |
|
Back to top |
|
|
Rulchik Особист
Joined: 29 Jun 2005 Posts: 36 Location: Санкт-Петербург
|
(Separately) Posted: Tue Sep 13, 2005 10:24 Post subject: |
|
|
Roz
Э-э-э... А что за скрипт-то вообще?.. |
|
Back to top |
|
|
Roz
Joined: 14 Jan 2005 Posts: 9
|
(Separately) Posted: Tue Sep 13, 2005 14:22 Post subject: |
|
|
Дело не в скрипте на втором компе все работает отлично.
Наприм.
Code: | '=====================================================================
' Создание папки с именем системной даты
' В параметрах вызова из TC должно быть прописано:
' %P
'=====================================================================
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
Dim MyPath, MyDate, NewFold, M1
MyPath = WScript.Arguments(0)
MyDate = Date
NewFold = MyPath & MyDate
If Not FSO.FolderExists(NewFold) Then
FSO.CreateFolder(NewFold)
M1 = MsgBox("Создана папка:" & chr(13) & NewFold, vbOKOnly + vbInformation, "Результат")
Else
M1 = MsgBox("Папка" & chr(13) & NewFold & chr(13) & "уже существует", vbOKOnly + vbExclamation, "Внимание!")
End If
Set FSO = Nothing
Wscript.Quit
|
Обидно просто, даже где искать ошибку незнаю. |
|
Back to top |
|
|
Volniy
Joined: 15 Dec 2004 Posts: 585 Location: Местный
|
(Separately) Posted: Tue Sep 13, 2005 17:33 Post subject: |
|
|
Roz wrote: | Обидно просто, даже где искать ошибку незнаю. |
На твоем компе есть какие-то проблемы с установкой WSH (а у тебя часом не 95 или 98 первая редакция?). Лучше не париться, а скачать и установить самый свежак, {лежит вот тут} . Там совсем небольшой дистрибутив, выбери только под свою ось и свой язык. |
|
Back to top |
|
|
Roz
Joined: 14 Jan 2005 Posts: 9
|
(Separately) Posted: Tue Sep 13, 2005 19:37 Post subject: |
|
|
Volniy
Quote: | (а у тебя часом не 95 или 98 первая редакция?) |
XP pro sp 2
Quote: | Лучше не париться, а скачать и установить самый свежак | Спасибо все работает. |
|
Back to top |
|
|
Aleks431
Joined: 23 May 2011 Posts: 74
|
(Separately) Posted: Tue Feb 07, 2017 16:37 Post subject: |
|
|
Добрый день! Подскажите, пожалуйста, нам на работе (бесправный ПК) похоже "групповой политикой" заблокировали выполнение скриптов. А ими я постоянно пользуюсь, особенно при отправке автоматически заполняемых шаблонов по почте, да и другого много чего.
Можно ли как-нибудь это обойти? Запуск с правами admin я думаю не пройдет, как-то уже пробовал, да и не известен логин и пароль администратора.
Может, например, скопировать/дублировать внутрь ТС нужные системные файлы Visual Basic с системного диска (cscript.exe и др. файлы и библиотеки, какие не знаю) чтобы кнопка обращалась к ним минуя ТО ЧТО ЗАБЛОКИРОВАЛИ.
Вот пример грубонедоделаной кнопки.
Code: | TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Scripts\cscript.exe "%COMMANDER_PATH%\Scripts\Outlook.vbs"
%P%N %L
TOTALCMD.EXE,37
Создать письмо
%COMMANDER_PATH%\Scripts\
1
-1 |
|
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Tue Feb 07, 2017 18:01 Post subject: |
|
|
Aleks431
Насчёт грубонедоделанности поточнее.
Понятно, что если WSH запрещён политиками, то никакой перенос файлов не поможет. Только компиляция. Какое окно выдаёт? _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Aleks431
Joined: 23 May 2011 Posts: 74
|
(Separately) Posted: Tue Feb 07, 2017 18:29 Post subject: |
|
|
Окно с ошибкой.
Windows Script Host.
Ошибка при выполнении сервера сценариев Windows. (Эта программа заблокирована групповой политикой. За дополнительными сведениями обращайтесь к системному администратору.) |
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Tue Feb 07, 2017 19:19 Post subject: |
|
|
Понятно. Если доступа к политикам и реестру нет, то особо тут ловить нечего. Компиляция с текущей GUI-версией тоже не вариант, всё равно ошибку выдаст, с консольной этой проблемы не было, но она не поддерживала параметры.
Если другие компиляторы не заблокированы, то остаётся переписать то, что идёт с параметрами, на них. Ну, %P ещё обойти можно, остальное вряд ли. _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Aleks431
Joined: 23 May 2011 Posts: 74
|
(Separately) Posted: Tue Feb 07, 2017 22:31 Post subject: |
|
|
А имея/получив права админа (на некоторое время, до перезагрузки) можно что-нибудь придумать? Что-то изменив, после перезагрузки, я думаю, удаленно снова настройки "групповых политик" заблокируются. У нас при загрузке стираются все админы, настройки ИЕ, хранителя экрана и другое. |
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Tue Feb 07, 2017 22:48 Post subject: |
|
|
Из комстроки: secpol.msc /s и см. "Политика управления приложениями" > AppLocker > Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить", меняем, перезагружаемся.
Ещё есть вариант блокировки расширений через диспетчер ресурсов файлсервера. В этом случае можно прибегнуть к переносу wscript.exe с манифестом и вызову скриптов с незарегистрированным в системе расширением вместо vbs. Но, судя по сообщению, это к делу вряд ли относится. _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Aleks431
Joined: 23 May 2011 Posts: 74
|
(Separately) Posted: Wed Feb 08, 2017 10:35 Post subject: |
|
|
Flasher wrote: | Из комстроки... Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить"... |
Зашел под админом. Никаких правил вообще нет. Видимо просто появляется стандартное окно со стандартной записью, а заблокировано как-то по другому.
Про "манифест" можно поподробнее? |
|
Back to top |
|
|
CaptainFlint
Joined: 14 Dec 2004 Posts: 6161 Location: Москва
|
(Separately) Posted: Tue Feb 14, 2017 01:45 Post subject: |
|
|
! | CaptainFlint: | Поскольку обсуждение не относится к TC, тема из Общих вопросов переносится в Программное обеспечение. | _________________ Почему же, ё-моё, ты нигде не пишешь "ё"? |
|
Back to top |
|
|
|