OLE шлюз. Восьмерка. И AtlRun.App
Добавлено: 03 фев 2006, 12:12
Галактика 8.0. Зарегистрировал два сервера.
1) Galnet.App -- это типа толстый клиент.
Вот код:
Dim gal As Variant, s As Variant, ss As Variant
Set gal = CreateObject("Galnet.App")
ss = gal.execvip("GETB", s)
MsgBox (s, ss)
gal.Quit
Set gal = Nothing
Интерфейс для выбора банка запускается. И после выбора позиции без ошибки закрывается.
2) AtlRun.App -- OLE сервер трехзвенного клиента. Тот же код, ну только вместо Galnet.App, AtlRun.App. При вызове интерфейса выдает рантайм 13 -- "Type Mismatch".
Можно ли в трехзвенном варианте полноценно работать с олешлюзом?
Самый главный вопрос. Кто-нибудь вообще работал с олешлюзом? Или все это сыро и больше чем показывать калькулятор в окне браузера не годно?
1) Galnet.App -- это типа толстый клиент.
Вот код:
Dim gal As Variant, s As Variant, ss As Variant
Set gal = CreateObject("Galnet.App")
ss = gal.execvip("GETB", s)
MsgBox (s, ss)
gal.Quit
Set gal = Nothing
Интерфейс для выбора банка запускается. И после выбора позиции без ошибки закрывается.
2) AtlRun.App -- OLE сервер трехзвенного клиента. Тот же код, ну только вместо Galnet.App, AtlRun.App. При вызове интерфейса выдает рантайм 13 -- "Type Mismatch".
Можно ли в трехзвенном варианте полноценно работать с олешлюзом?
Самый главный вопрос. Кто-нибудь вообще работал с олешлюзом? Или все это сыро и больше чем показывать калькулятор в окне браузера не годно?