Не работают скрипты, нужен совет.
Select messages from
# through # FAQ
[/[Print]\]

Total Commander -> Программное обеспечение

#1: Не работают скрипты, нужен совет. Author: Roz PostPosted: Mon Sep 12, 2005 23:18
    —
Вот так ругается как исправить можно?
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

#2:  Author: RulchikLocation: Санкт-Петербург PostPosted: Tue Sep 13, 2005 10:24
    —
Roz
Э-э-э... А что за скрипт-то вообще?..

#3:  Author: Roz PostPosted: Tue Sep 13, 2005 14:22
    —
Дело не в скрипте на втором компе все работает отлично.
Наприм.
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

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

#4:  Author: VolniyLocation: Местный PostPosted: Tue Sep 13, 2005 17:33
    —
Roz wrote:
Обидно просто, даже где искать ошибку незнаю. Embarassed

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

#5:  Author: Roz PostPosted: Tue Sep 13, 2005 19:37
    —
Volniy
Quote:
(а у тебя часом не 95 или 98 первая редакция?)

XP pro sp 2
Quote:
Лучше не париться, а скачать и установить самый свежак
Спасибо все работает.

#6:  Author: Aleks431 PostPosted: Tue Feb 07, 2017 16:37
    —
Добрый день! Подскажите, пожалуйста, нам на работе (бесправный ПК) похоже "групповой политикой" заблокировали выполнение скриптов. А ими я постоянно пользуюсь, особенно при отправке автоматически заполняемых шаблонов по почте, да и другого много чего.
Можно ли как-нибудь это обойти? Запуск с правами 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

#7:  Author: FlasherLocation: Москва PostPosted: Tue Feb 07, 2017 18:01
    —
Aleks431
Насчёт грубонедоделанности поточнее.
Понятно, что если WSH запрещён политиками, то никакой перенос файлов не поможет. Только компиляция. Какое окно выдаёт?

#8:  Author: Aleks431 PostPosted: Tue Feb 07, 2017 18:29
    —
Окно с ошибкой.
Windows Script Host.
Ошибка при выполнении сервера сценариев Windows. (Эта программа заблокирована групповой политикой. За дополнительными сведениями обращайтесь к системному администратору.)

#9:  Author: FlasherLocation: Москва PostPosted: Tue Feb 07, 2017 19:19
    —
Понятно. Если доступа к политикам и реестру нет, то особо тут ловить нечего. Компиляция с текущей GUI-версией тоже не вариант, всё равно ошибку выдаст, с консольной этой проблемы не было, но она не поддерживала параметры.
Если другие компиляторы не заблокированы, то остаётся переписать то, что идёт с параметрами, на них. Ну, %P ещё обойти можно, остальное вряд ли.

#10:  Author: Aleks431 PostPosted: Tue Feb 07, 2017 22:31
    —
А имея/получив права админа (на некоторое время, до перезагрузки) можно что-нибудь придумать? Что-то изменив, после перезагрузки, я думаю, удаленно снова настройки "групповых политик" заблокируются. У нас при загрузке стираются все админы, настройки ИЕ, хранителя экрана и другое.

#11:  Author: FlasherLocation: Москва PostPosted: Tue Feb 07, 2017 22:48
    —
Из комстроки: secpol.msc /s и см. "Политика управления приложениями" > AppLocker > Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить", меняем, перезагружаемся.

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

#12:  Author: Aleks431 PostPosted: Wed Feb 08, 2017 10:35
    —
Flasher wrote:
Из комстроки... Исполняемые плавила/Правила сценариев. Находим в списке нужное с "Запретить"...

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

#13:  Author: CaptainFlintLocation: Москва PostPosted: Tue Feb 14, 2017 01:45
    —
 !  CaptainFlint:
Поскольку обсуждение не относится к TC, тема из Общих вопросов переносится в Программное обеспечение.



Total Commander -> Программное обеспечение


output generated using printer-friendly topic mod. All times are GMT + 4 Hours

Page 1 of 1

Powered by phpBB © 2001, 2005 phpBB Group