dim result If fromEdge.OID.Roadlinks.RoadDesc = "Minor Road" and toEdge.OID.Roadlinks.Nature = "Roundabout" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.20 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "Local Street" and toEdge.OID.Roadlinks.Nature = "Roundabout" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.20 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "B Road" and toEdge.OID.Roadlinks.Nature = "Roundabout" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.20 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "A Road" and toEdge.OID.Roadlinks.Nature = "Roundabout" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.20 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "Motorway" and toEdge.OID.Roadlinks.Nature = "Roundabout" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.20 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "A Road" and toEdge.OID.Roadlinks.RoadDesc = "Minor Road" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.50 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "A Road" and toEdge.OID.Roadlinks.RoadDesc = "Local Street" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.50 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "A Road" and toEdge.OID.Roadlinks.RoadDesc = "B Road" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.50 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "Motorway" and toEdge.OID.Roadlinks.RoadDesc = "Minor Road" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.50 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "Motorway" and toEdge.OID.Roadlinks.RoadDesc = "Local Street" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.50 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "Motorway" and toEdge.OID.Roadlinks.RoadDesc = "B Road" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.50 ) ElseIf fromEdge.OID.Roadlinks.RoadDesc = "Motorway" and toEdge.OID.Roadlinks.RoadDesc = "A Road" then result = "Economy" + ( fromEdge.OID.Roadlinks.SpeedCostTotalRoad * 0.50 ) END IF
Aangemelde leden kunnen berichten plaatsen, updates volgen en meer. Nieuw hier? Registreer een gratis account.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.