VBScript для AE - чтение XLS без Excel и запись красивого XML

Простой VBS сделайте. Что бы ничего не делал. Запустился, и закрылся
Сделайте простой воркфлоу с тикетом ранскрипт. Протектируйте
 
Spirit412 сказал(а):
Простой VBS сделайте. Что бы ничего не делал. Запустился, и закрылся
Сделайте простой воркфлоу с тикетом ранскрипт. Протектируйте
Нажмите, чтобы раскрыть...
да делал уже. И "Приветмир" делал )). Если его один запустить (из проводника) он работает. Глюк какой-то с Run Script. В чем проблема не пойму. Поискал фиксы, но не было вроде такой проблемы у AE 18.
 
Я понял в чем грабля. Попробуйте отключить сервис ранскрипта в службах и приложении. И запустить его вручную (появится отдельное окошко с кучей текста). Если пройдет - можно просто батник настроить на автозапуск при старте системы.
 
dimonchikk сказал(а):
Я понял в чем грабля. Попробуйте отключить сервис ранскрипта в службах и приложении. И запустить его вручную (появится отдельное окошко с кучей текста). Если пройдет - можно просто батник настроить на автозапуск при старте системы.
Нажмите, чтобы раскрыть...
Как сервис отключил. А в приложении что нужно сделать? удалить в конфиге на вкладке скрипты? И что потом вручную запускать?
Screenshot_3.jpg
 
Нет. Просто экзешник скриптраннера запустить.
 
C:\Esko\bg_prog_fastserverscrrunnt_v180\bin\egscrrun
 
Выдожи код твоего vbs скрипта Привет мир.
 
dimonchikk сказал(а):
C:\Esko\bg_prog_fastserverscrrunnt_v180\bin\egscrrun
Нажмите, чтобы раскрыть...
Все сейчас выглядит вот так:
Screenshot_4.jpg

Но все равно не работает Run Скрипт. Может что-то еще перезапустить надо? скриптраннер стоит только на сервере. С локалки удалил.
 
Ну теперь чекнуть бы все с ае конфигатора. тест коннекшн. И пробовать стартовать скрипты.
 
И тикет свой ранскрипта покажи плиз.
 
Выше коллега спрашивал про код скрипта. Мож там что напутано?
 
Тут уже не скажу. Я помню почему не работал скрипт раннер в виде сервиса. И заработал в таком варианте. Дальше уже нужно гуру теребить. Проснутся скоро - может ответят ;]=
 
Spirit412 сказал(а):
Короче, VBS под АЕ пишется не так как обычно. Обязательно нужны inputs() params() и outputFolder
и Main = "OK" если всё хорошо закончилось
Читай мануал
Смотри примеры
Нажмите, чтобы раскрыть...
я вроде оттуда и брал:
Код: 
Function Main (inputs, outputFolder, params)
Wscript.Echo "hello World"
Main = ok
End Function

Dim inputs()
Dim outputFolder
Dim params()
Main inputs, outputFolder, params
 
Проблема в том, имхо, что сам тикет даже не начинает работать. Он либо чего-то не получает, чотбы начать запуск. Типа, ответа сервера.
 

Вложения

  • Screenshot_5.jpg
    Screenshot_5.jpg
    75.3 КБ · Просм.: 199
Последнее редактирование:
1621404060634.png



Код: 
Function Main(inputs, outputFolder, params)

WScript.Echo(Recode("hello World" & inputFile, "cp866", "windows-1251"))
End function


'Функция смены кодировки для вывода кирилицы в консоль'
            Function Recode(StrText, SrcCode, DestCode)
                With CreateObject("ADODB.Stream")
                    .Type = 2
                    .Mode = 3
                    .Charset = DestCode
                    .Open
                    .WriteText (strText)
                    .Position = 0
                    .Charset = SrcCode
                    Recode = .ReadText
                    .Close
                end with
            End Function


Dim inputs()
Dim outputFolder
Dim params()

Main inputs, outputFolder, params
Main = "OK"

Сам файл VBS в кодировке windows-1251
 
Screenshot_8.jpg


Попробовал скрипт, но у меня (справа) вообще не стартует процесс (часики висят ожидания)
 
Для ответа нужно войти/зарегистрироваться
Верх Низ