Страница 1 из 1
Не работают скрипты, нужен совет.
Добавлено: Пн сен 12, 2005 23:18
Roz
Вот так ругается как исправить можно?
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
Добавлено: Вт сен 13, 2005 10:24
Rulchik
Roz
Э-э-э... А что за скрипт-то вообще?..
Добавлено: Вт сен 13, 2005 14:22
Roz
Дело не в скрипте на втором компе все работает отлично.
Наприм.
Код: Выделить всё
'=====================================================================
' Создание папки с именем системной даты
' В параметрах вызова из 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
Обидно просто, даже где искать ошибку незнаю.
Добавлено: Вт сен 13, 2005 17:33
Volniy
Roz писал(а):Обидно просто, даже где искать ошибку незнаю.
На твоем компе есть какие-то проблемы с установкой WSH (а у тебя часом не 95 или 98 первая редакция?). Лучше не париться, а скачать и установить самый свежак,
{лежит вот тут} . Там совсем небольшой дистрибутив, выбери только под свою ось и свой язык.
Добавлено: Вт сен 13, 2005 19:37
Roz
Volniy
(а у тебя часом не 95 или 98 первая редакция?)
XP pro sp 2
Лучше не париться, а скачать и установить самый свежак
Спасибо все работает.
Добавлено: Вт фев 07, 2017 15:37
Aleks431
Добрый день! Подскажите, пожалуйста, нам на работе (бесправный ПК) похоже "групповой политикой" заблокировали выполнение скриптов. А ими я постоянно пользуюсь, особенно при отправке автоматически заполняемых шаблонов по почте, да и другого много чего.
Можно ли как-нибудь это обойти? Запуск с правами admin я думаю не пройдет, как-то уже пробовал, да и не известен логин и пароль администратора.
Может, например, скопировать/дублировать внутрь ТС нужные системные файлы Visual Basic с системного диска (cscript.exe и др. файлы и библиотеки, какие не знаю) чтобы кнопка обращалась к ним минуя ТО ЧТО ЗАБЛОКИРОВАЛИ.
Вот пример грубонедоделаной кнопки.
Код: Выделить всё
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Scripts\cscript.exe "%COMMANDER_PATH%\Scripts\Outlook.vbs"
%P%N %L
TOTALCMD.EXE,37
Создать письмо
%COMMANDER_PATH%\Scripts\
1
-1
Добавлено: Вт фев 07, 2017 17:01
Flasher
Aleks431
Насчёт грубонедоделанности поточнее.
Понятно, что если WSH запрещён политиками, то никакой перенос файлов не поможет. Только
компиляция. Какое окно выдаёт?
Добавлено: Вт фев 07, 2017 17:29
Aleks431
Окно с ошибкой.
Windows Script Host.
Ошибка при выполнении сервера сценариев Windows. (Эта программа заблокирована групповой политикой. За дополнительными сведениями обращайтесь к системному администратору.)
Добавлено: Вт фев 07, 2017 18:19
Flasher
Понятно. Если доступа к политикам и реестру нет, то особо тут ловить нечего. Компиляция с текущей GUI-версией тоже не вариант, всё равно ошибку выдаст, с консольной этой проблемы не было, но она не поддерживала параметры.
Если другие компиляторы не заблокированы, то остаётся переписать то, что идёт с параметрами, на них. Ну, %P ещё обойти можно, остальное вряд ли.
Добавлено: Вт фев 07, 2017 21:31
Aleks431
А имея/получив права админа (на некоторое время, до перезагрузки) можно что-нибудь придумать? Что-то изменив, после перезагрузки, я думаю, удаленно снова настройки "групповых политик" заблокируются. У нас при загрузке стираются все админы, настройки ИЕ, хранителя экрана и другое.
Добавлено: Вт фев 07, 2017 21:48
Flasher
Из комстроки: secpol.msc /s и см. "Политика управления приложениями" > AppLocker > Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить", меняем, перезагружаемся.
Ещё есть вариант блокировки расширений через диспетчер ресурсов файлсервера. В этом случае можно прибегнуть к переносу wscript.exe с манифестом и вызову скриптов с незарегистрированным в системе расширением вместо vbs. Но, судя по сообщению, это к делу вряд ли относится.
Добавлено: Ср фев 08, 2017 09:35
Aleks431
Flasher писал(а):Из комстроки... Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить"...
Зашел под админом. Никаких правил вообще нет. Видимо просто появляется стандартное окно со стандартной записью, а заблокировано как-то по другому.
Про "манифест" можно поподробнее?
Добавлено: Вт фев 14, 2017 00:45
CaptainFlint
[mod="CaptainFlint"]Поскольку обсуждение не относится к TC, тема из Общих вопросов переносится в Программное обеспечение.[/mod]