Hallo,
ich hab mal wieder die Erfahrung gemacht das CATIA nichts für Gelegenheitsprogrammierer ist.
Ich hab ein Product Template mit einer Reaction erstellt. Die Reaction löscht mit VB Script einige Constrains und Parts. Wenn ich die Reaction in dem Product auslöse in dem sie definiert ist, klappt alles bestens. Wenn ich das ganze jedoch in ein weiteres Product einfüge hagelt es Fehlermeldungen (Methode nicht unterstützt).
Hat jemand eine Idee?
Gruß
Michael
Hier der Code.
Sub main
Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument
Dim product1 As Product
Set product1 = productDocument1.Product
Dim Assy As Products
Set Assy = product1.Products
Dim NutSelect As Selection
Set NutSelect = productDocument1.Selection
NutSelect.Clear
Dim ConSelect As Selection
Set ConSelect = productDocument1.Selection
ConSelect.Clear
Dim parameters1 As Parameters
Set parameters1 = product1.Parameters
Dim Nut As Parameter
Set Nut = parameters1.Item("Nut")
Dim constraints1 As Collection
Set cons1 = product1.Connections("CATIAConstraints")
Dim cons1 As Constraint
if (Nut.Value = "xyz") then
Set Con = cons1.Item("Coincidence.06_1")
ConSelect.Add Con
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP