Имя: Пароль:
1C
 
Скрипт WSH выдаёт ошибку "Тип не определен"
, ,
0 pro3ri
 
26.01.16
14:47
ДОбрый день!

Есть скрипт:

Set    Base = CreateObject("V83.Application")
    Result = Base.Connect("File=""E:\base\1"";Usr=""1"";")
Set    Man1 = Base.NewObject("СправочникМенеджер.Пользователи")
Set    Object = Man1.CreateItem()
    Object.Description = "Vbs"
    object.Write()
    
Set Str = Base.NewObject("Структура")
     Str.Insert "Ключ", object.ref
    
     Base.OpenForm "Справочник.Пользователи.ФормаОбъекта", Str

Выдает ошибку https://s.mail.ru/EnwcCsKDBsJq/img-2016-01-26-16-48-08.png Может кто сталкивался как поправить?
1 cw014
 
26.01.16
14:50
1) Права отсуствуют
2) Нет такого справочника
2 cw014
 
26.01.16
14:50
Управляемые формы?
3 pro3ri
 
26.01.16
14:54
да (2)
4 cw014
 
26.01.16
14:55
Тогда понятно
5 cw014
 
26.01.16
14:55
Создавай два объекта
6 cw014
 
26.01.16
14:56
Один из них "V83.COMConnector" - он будет создателем
7 cw014
 
26.01.16
14:56
"V83.Application" - открывателем форм
8 cw014
 
26.01.16
14:58
V83.Application - это Automation сервер, работает только с клиентом. В тонком клиенте у него нету типов "СправочникМенеджер"
9 cw014
 
26.01.16
14:58
"V83.COMConnector" - Внешнее соединение - работает на уровне сервера
10 pro3ri
 
27.01.16
07:14
https://s.mail.ru/23vRcmpZC6iR/img-2016-01-27-09-14-33.png невозможно создание объекта контейнером active X

Код:

Set    Base = CreateObject("V83.Application")
    Result = Base.Connect("File=""E:\base\1"";Usr=""1"";")
Set    Base2 = CreateObject("v83.COMConnector")
    Result2 = Base2.Connect("File=""E:\base\1"";Usr=""1"";")
Set    m = Base.NewObject("СправочникМенеджер.Пользователи")
Set    Object = m.CreateItem()
    Object.Description = "Vbs"
    object.Write()
    
Set Str = Base.NewObject("Структура")
     Str.Insert "Ключ", object.ref
    
     Base.OpenForm "Справочник.Пользователи.ФормаОбъекта", Str