Message 1 of 2
Any fast way to get all node coordinates?
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
I want to output all the nodes coordinates with NodeID.
The code I used is some one posted in the forum as following:
Dim StudyDoc, Node, Label, Coord
Set StudyDoc = Synergy.StudyDoc()
Set Node = StudyDoc.GetFirstNode()
While Not Node Is Nothing
Label = StudyDoc.GetEntityID(Node)
Set Coord = StudyDoc.GetNodeCoord(Node)
DataFile.Write Label & Chr(9) & Coord.X & Chr(9) & Coord.Y & Chr(9) & Coord.Z & vbCrLf
Set Node = StudyDoc.GetNextNode(Node)
Wend
The problem is that, when the model is complicated, it requires several hours to output.
Any other solution is faster?
Thanks!
