Как подключиться к уже существующей сессии Компас 3D?

[Михаил_С]

Как подключиться к уже существующей сессии Компас 3D? Так, чтобы новая сессия не создавалась.

[Kredo]

Kompas:=KompasObject(GetActiveOleObject(’Kompas.Application.5’));

[Михаил_С]

А не подскажите, как это сделать в VB?

[Kredo]

Вряд ли смогу тут чем-то подсказать, т.к. не знаю этого языка. Посмотрите в примерах. Там наверняка есть.

[333]

Set Kompas = GetObject(, "KOMPAS.Application.5")
см SDK\Basic\ksContrl

[Михаил_С]

Спасибо. Все получилось.