Не работают скрипты, нужен совет.

[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

[Rulchik]

Roz
Э-э-э... А что за скрипт-то вообще?..

[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

Обидно просто, даже где искать ошибку незнаю.

[Volniy]

Обидно просто, даже где искать ошибку незнаю.

На твоем компе есть какие-то проблемы с установкой WSH (а у тебя часом не 95 или 98 первая редакция?). Лучше не париться, а скачать и установить самый свежак, {лежит вот тут} . Там совсем небольшой дистрибутив, выбери только под свою ось и свой язык.

[Roz]

Volniy

(а у тебя часом не 95 или 98 первая редакция?)

XP pro sp 2

Лучше не париться, а скачать и установить самый свежак

Спасибо все работает.

[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

[Flasher]

Aleks431
Насчёт грубонедоделанности поточнее.
Понятно, что если WSH запрещён политиками, то никакой перенос файлов не поможет. Только компиляция. Какое окно выдаёт?

[Aleks431]

Окно с ошибкой.
Windows Script Host.
Ошибка при выполнении сервера сценариев Windows. (Эта программа заблокирована групповой политикой. За дополнительными сведениями обращайтесь к системному администратору.)

[Flasher]

Понятно. Если доступа к политикам и реестру нет, то особо тут ловить нечего. Компиляция с текущей GUI-версией тоже не вариант, всё равно ошибку выдаст, с консольной этой проблемы не было, но она не поддерживала параметры.
Если другие компиляторы не заблокированы, то остаётся переписать то, что идёт с параметрами, на них. Ну, %P ещё обойти можно, остальное вряд ли.

[Aleks431]

А имея/получив права админа (на некоторое время, до перезагрузки) можно что-нибудь придумать? Что-то изменив, после перезагрузки, я думаю, удаленно снова настройки "групповых политик" заблокируются. У нас при загрузке стираются все админы, настройки ИЕ, хранителя экрана и другое.

[Flasher]

Из комстроки: secpol.msc /s и см. "Политика управления приложениями" > AppLocker > Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить", меняем, перезагружаемся.

Ещё есть вариант блокировки расширений через диспетчер ресурсов файлсервера. В этом случае можно прибегнуть к переносу wscript.exe с манифестом и вызову скриптов с незарегистрированным в системе расширением вместо vbs. Но, судя по сообщению, это к делу вряд ли относится.

[Aleks431]

Из комстроки... Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить"...

Зашел под админом. Никаких правил вообще нет. Видимо просто появляется стандартное окно со стандартной записью, а заблокировано как-то по другому.
Про "манифест" можно поподробнее?

[CaptainFlint]

[mod="CaptainFlint"]Поскольку обсуждение не относится к TC, тема из Общих вопросов переносится в Программное обеспечение.[/mod]