Frage

Wie kann man über COM eine IV-Kurzwegsuche durchführen?

Antwort

Ein Beispiel für eine Kurzwegsuche zwischen zwei Knoten:

Set NetElementContainer = Visum.CreateNetElements
Set Node = Visum.Net.Nodes.ItemByKey(10)
NetElementContainer.Add Node
Set Node = Visum.Net.Nodes.ItemByKey(40)
NetElementContainer.Add Node
'Route search with current speed tCur
Set RouteSearchPrT = Visum.Analysis.RouteSearchPrT
RouteSearchPrT.Clear
VSysCode = "C"
RouteSearchPrT.Execute NetElementContainer, VSysCode, 1

Ein komplexeres Beispiel worin das Ergebnis nach einer Liste und in eine Attributdatei geschrieben wird:
http://vision-traffic.ptvgroup.com/faq-files/PTV_ExampleShortestPathSearch.zip