---

Hallo,

ich möchte nur die Klemmen im Projekt mit der Artikelnummer "1604680000" umbenennen und zwar in folgender Form:

"Bereits festgelegter Anschlusspunktname" + PE

Beispiel:

Aus "7" soll "7PE" werden.
Ist dies möglich?

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

---

Hallo Nick,

zuerst einmal willkommen im E³.series Forum!

Über COM sollte das gehen, den Code musst Du vielleicht doch etwas anpassen.
Dazu den Code einfach in eine Textdatei kopieren und die Datei in vbs umbenennen ...

Ich bin jetzt mal davon ausgegangen, dass Du nicht den Bauteilnamen sondern das Attribut Artikelnummer meinst:

Code:

---

Set e3 = CreateObject( "CT.Application" )
Set prj = e3.CreateJobObject()
Set dev = prj.CreateDeviceObject()
Set pin = prj.CreatePinObject()

devcnt = prj.GetAllDeviceIds( devids )
For i = 1 To devcnt
    dev.setid( devids(i))
    If( dev.IsTerminal() = 1 ) Then
        aNr = dev.GetAttributeValue( "Artikelnummer" )

        If( aNr = "1604680000" ) Then
            pinCnt = dev.GetPinIds( pinIds )
            For j = 1 To pincnt
                pin.SetId( pinids(j))
                If( pin.GetName() = "7" ) Then
                    pin.SetName "7PE"
                End If
            Next
        End If
    End If
Next

Set pin = Nothing
Set dev = Nothing
Set prj = Nothing

---

[Diese Nachricht wurde von K0NFUZIUS am 08. Nov. 2012 editiert.]

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

---

Danke für deine Vorlage, komme wohl ums scripten nicht herum. Leider ist die Materialnummer kein Atribut sondern ein festgelegter Text, wie komm ich denn an diesen Wert?

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

---

Habs gefunden, lese es mit "dev.GetComponentAttributeValue" aus. Nochmal danke für den Ansatz.

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

---

Gerne wieder 

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

---

Wenn doch die Hilfe nur bisserl besser wäre, kann mir jemand verraten wie ich an den Namen der Klemmleiste komm? (Also zB -X1)

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

---

tsid = dev.GetTerminalBlockId() 'liefert dir von der Klemme die Klemmleiste

dev2.Setid tsid 'Klemmleiste setzen
dev2.GetName()  ' Art/Zählnummrer
dev2.GetLocation() 'Ortskennzeichen
dev2.GetAssignment() 'Anlagekennzeichen'

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