Я понял, что нужно смотреть iassembly...
В справке нашел один пример только для вставки iassembly...привожу начало кода
' Open the factory document invisible.
Dim oFactoryDoc As AssemblyDocument
Set oFactoryDoc = ThisApplication.Documents.Open("D:\Users\Сборка10.iam", False)
' Set a reference to the component definition.
Dim oCompDef As AssemblyComponentDefinition
Set oCompDef = oFactoryDoc.ComponentDefinition
' Make sure we have an iAssembly factory.
If oCompDef.IsiAssemblyFactory = False Then
MsgBox "Chosen document is not a factory.", vbExclamation
Exit Sub
End If
' Set a reference to the factory.
Dim oiAssyFactory As iAssemblyFactory
Set oiAssyFactory = oCompDef.iAssemblyFactory
с самого начала почему-то выполняется строчка CompDef.IsiAssemblyFactory = False, то есть не может найти определение icopy в сборке.... но оно там есть, я его создал.
Подскажите пожалуйста, в чем может быть проблема.
