Получение пути к файлу подавленного вхождения.

[R.I.Chernov]

Доброго времени суток, уважаемые форумчане! Ищу вашей помощи в решении такой вот задачи:
В сборке есть подавленная деталь / сборка. Мне требуется узнать путь к файлу детали / сборки (свойство Document.FullFileName), для того, чтобы использовать его в ComponentOccurrences.Add(). Единственный способ, который я нашел, это снять подавление, считать свойство и снова подавить вхождение. Но это нудно, неудобно и тратит кучу времени (так как операций таких много). Быть может кому известен более простой способ узнать путь к файлу на компьютере для подавленного вхождения?

[mikazakov]

Мне требуется узнать путь к файлу детали

Document.File.ReferencedFileDescriptors
Там все то нужно.

Есть еще немного по ближе
Document.ReferencedFileDescriptors
Но эта ссылка на объект скрыта, видимо потому что оно устаревшее и не рекомендуется к использованию.

[R.I.Chernov]

Document.File.ReferencedFileDescriptors
Там все то нужно.

Спасибо, Михаил! Но у меня такой вопрос, правильно ли я понял, что обращаться к членам коллекции можно только по индексу?

[mikazakov]

Хэлп сообщает:
Input Variant value that specifies the FileDescriptor to return. This can be either a numeric value indicating the index of the item in the collection or it can be a string indicating the full file name. If an out of range index or a name of a non-existent FileDescriptor is provided, an error will occur.
Ну обращение либо по индексу либо по полному имени.

[R.I.Chernov]

Ну обращение либо по индексу либо по полному имени.

По полному имени обращаться не вариант, я его, по сути, и ищу. Но обращение по индексу тоже неудобно. Покопался сейчас, сложилось впечатление, что члены коллекции расположены по алфавиту, т.е. если ты добавишь какую-то деталь, чье имя по алфавиту раньше всех остальных в сборке, то файл детали становится первым в коллекции File.ReferencedFileDescriptors(), все остальные индексы плывут. В общем вопрос остался открытым.

[mikazakov]

По полному имени обращаться не вариант, я его, по сути, и ищу. Но обращение по индексу тоже неудобно.

Да на вас, батенька, не угодить

[R.I.Chernov]

По полному имени обращаться не вариант, я его, по сути, и ищу. Но обращение по индексу тоже неудобно.

Да на вас, батенька, не угодить

Ну вот не правда! Просто данный способ не выполняет моей задачи. В любом случае я очень благодарен вам за помощь!

[Алексей Романов]

требуется узнать путь к файлу детали / сборки (свойство Document.FullFileName),

Может чего не понимаю, это разве не работает?

Код - Visual Basic [Выбрать]

1. Dim oAsmCompDef As AssemblyComponentDefinition
2. Set oAsmCompDef = ThisApplication.ActiveDocument.ComponentDefinition
3. Dim occ As ComponentOccurrence
4. For Each occ In oAsmCompDef.Occurrences
5.     If occ.Suppressed = True Then
6.         MsgBox occ.ReferencedDocumentDescriptor.ReferencedFileDescriptor.FullFileName
7.     End If
8. Next

[R.I.Chernov]

Может чего не понимаю, это разве не работает?

Нет, это как раз то, что мне было нужно. Я просто не додумался до такого кода. А именно, что можно преобразовать Document.File.ReferencedFileDescriptors.Item() в Occurrence.ReferencedDocumentDescriptor.ReferencedFileDescriptor.
Я еще плохо понимаю работу элементов "Referenced..."
Большое спасибо, Михаил!

[Александр Ривилис]

Большое спасибо, Михаил!

А почему Михаил, когда Алексей Романов

[R.I.Chernov]

почему Михаил, когда Алексей Романов 

прошу "понять и простить" ! Общались с Михаилом до этого, из-за того и ошибся!+1 к карме все равно поставил куда надо! спасибо, Алексей! Спасибо, Михаил! Спасибо, Александр! Всем спасибо!