---

hello und sorry für mein Deutch 
Ich habe so ein Problem.
Ich habe 3 oder mehr CATProducts und unter diesen Products sind CATParts, mein problem liegt an Namen von CATParts die haben 2 Namen Instance Name und Part Number, ich will durch das ausgewelte produkt durgehen und wen die Part Number anders ist als Instance Name dan Instanc Name ändern auf Part Number, das problem ist das ich nicht weis wie ich auf den Part Number zugreifen kann, und nur die CATParts die zu diesen CATProduct gehüren zugreifen nicht auf alle, ich weis das ich auf alle CATParts greifen kann und dan Instance Name zu ändern. Kann mir jemand helfen ??

Danke MFG Tomek

[Diese Nachricht wurde von toyo83 am 19. Jul. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich habe leider keine Zeit um das ganz aufzubauen aber es musste
so in etwa gehen.

Von deinem ProductXX in dem sich die Parts/Products befinden
ProductsXX = productXX.products
machen
und mit   n = productsXX.count
die Anzahl der Teile ermitteln
dann mit einer Schleife 
For i = 1 to n
  document = productsxx.Item(i)
next i

durchlaufen.

da drin dann noch so was wie
If TypeName(InfDoc) = "PartDocument" Then
                PartDoc = CType(InfDoc, PartDocument)
                PartDoc.Name
                Dim Product As Product
                Product = PartDoc.Product
                Product.PartNumber
                RootProduct = PartDoc.Product
else if TypeName(InfDoc) = "ProductDocument" Then
...

Hoffe das hilft dir ein bisschen weiter!

[Diese Nachricht wurde von crow73 am 19. Jul. 2007 editiert.]

[Diese Nachricht wurde von crow73 am 19. Jul. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP