Giters

microsoft / BingMapsRESTToolkit

This is a portable class library which makes it easy to access the Bing Maps REST services from .NET.

Home Page:https://github.com/Microsoft/BingMapsRESTToolkit/

Geek Repo:Geek Repo

Github PK Tool:Github PK Tool

Convert to VB.net

secureitall opened this issue · comments

commented

Im trying to use the route optimise from the example and convert to vb.net
unfotunatly the 'OptimizeItineraryRequest' is not defined.
Im assuming its a conversion issue but unsure where to go from here

Many Thanks

Dim request As OptimizeItineraryRequest = New OptimizeItineraryRequest() With { .Agents = New List(Of Agent)() From { New Agent() With { .Name = "Bob", .Shifts = New List(Of Shift)() From { New Shift() With { .StartTimeUtc = New DateTime(2022, 1, 1, 8, 0, 0), .StartLocation = New SimpleWaypoint("1603 NW 89th St, Seattle, WA 98117, US"), .EndTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .EndLocation = New SimpleWaypoint(47.7070790545669, -122.355226696231), .Breaks = New Break() {New Break() With { .StartTimeUtc = New DateTime(2022, 1, 1, 12, 0, 0), .EndTimeUtc = New DateTime(2022, 1, 1, 14, 0, 0), .DurationTimeSpan = New TimeSpan(0, 30, 0) }, New Break() With { .StartTimeUtc = New DateTime(2022, 1, 1, 16, 0, 0), .EndTimeUtc = New DateTime(2022, 1, 1, 16, 30, 0) }} } }, .Price = New Price() With { .FixedPrice = 100, .PricePerHour = 5, .PricePerKM = 1 }, .Capacity = New Integer() {16} }, New Agent() With { .Name = "Charlie", .Shifts = New List(Of Shift)() From { New Shift() With { .StartTimeUtc = New DateTime(2022, 1, 1, 8, 0, 0), .StartLocation = New SimpleWaypoint("1 Microsoft way, WA 98052, US"), .EndTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .EndLocation = New SimpleWaypoint(47.7070790545669, -122.355226696231), .Breaks = New Break() {New Break() With { .StartTimeUtc = New DateTime(2022, 1, 1, 12, 0, 0), .EndTimeUtc = New DateTime(2022, 1, 1, 14, 0, 0), .DurationTimeSpan = New TimeSpan(0, 30, 0) }, New Break() With { .StartTimeUtc = New DateTime(2022, 1, 1, 16, 0, 0), .EndTimeUtc = New DateTime(2022, 1, 1, 16, 30, 0) }} } }, .Price = New Price() With { .FixedPrice = 100, .PricePerHour = 5, .PricePerKM = 1 }, .Capacity = New Integer() {16} }, New Agent() With { .Name = "Terry", .Shifts = New List(Of Shift)() From { New Shift() With { .StartTimeUtc = New DateTime(2022, 1, 1, 8, 0, 0), .StartLocation = New SimpleWaypoint(47.746135, -122.199314), .EndTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .EndLocation = New SimpleWaypoint(47.746135, -122.199314), .Breaks = New Break() {New Break() With { .StartTimeUtc = New DateTime(2022, 1, 1, 12, 0, 0), .EndTimeUtc = New DateTime(2022, 1, 1, 14, 0, 0), .DurationTimeSpan = New TimeSpan(0, 30, 0) }, New Break() With { .StartTimeUtc = New DateTime(2022, 1, 1, 16, 0, 0), .EndTimeUtc = New DateTime(2022, 1, 1, 16, 30, 0) }} } }, .Price = New Price() With { .FixedPrice = 100, .PricePerHour = 5, .PricePerKM = 1 }, .Capacity = New Integer() {16} } }, .ItineraryItems = New List(Of OptimizeItineraryItem)() From { New OptimizeItineraryItem() With { .Name = "Customer 1", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 32, 0), .Priority = 5, .Quantity = New Integer() {4}, .Waypoint = New SimpleWaypoint("8712 Jones Pl NW, Seattle, WA 98117, US") }, New OptimizeItineraryItem() With { .Name = "Customer 2", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(1, 34, 0), .Priority = 16, .Quantity = New Integer() {-3}, .Waypoint = New SimpleWaypoint(47.6962193175262, -122.342180147243), .DropOffFrom = New String() {"Customer 3"} }, New OptimizeItineraryItem() With { .Name = "Customer 3", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(1, 0, 0), .Priority = 88, .Quantity = New Integer() {3}, .Waypoint = New SimpleWaypoint(47.6798098928389, -122.383036445391) }, New OptimizeItineraryItem() With { .Name = "Customer 4", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 25, 0), .Priority = 3, .Quantity = New Integer() {-3}, .Waypoint = New SimpleWaypoint(47.6867440824094, -122.354711700877), .DropOffFrom = New String() {"Customer 1"} }, New OptimizeItineraryItem() With { .Name = "Customer 5", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {-1}, .Waypoint = New SimpleWaypoint(47.6846639223203, -122.364839942855), .DropOffFrom = New String() {"Customer 1"} }, New OptimizeItineraryItem() With { .Name = "Customer 6", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.668492, -122.19382) }, New OptimizeItineraryItem() With { .Name = "Customer 7", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.745673, -122.246702) }, New OptimizeItineraryItem() With { .Name = "Customer 8", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.60972, -122.143685) }, New OptimizeItineraryItem() With { .Name = "Customer 9", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.536975, -122.167035) }, New OptimizeItineraryItem() With { .Name = "Customer 10", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.594438, -122.311946) }, New OptimizeItineraryItem() With { .Name = "Customer 11", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.583784, -122.180084) }, New OptimizeItineraryItem() With { .Name = "Customer 12", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.658778, -122.047535) }, New OptimizeItineraryItem() With { .Name = "Customer 13", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.727659, -122.101104) }, New OptimizeItineraryItem() With { .Name = "Customer 14", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 18, 0), .Priority = 1, .Quantity = New Integer() {5}, .Waypoint = New SimpleWaypoint(47.701782, -122.298898) }, New OptimizeItineraryItem() With { .Name = "Customer 15", .OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0), .ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0), .DwellTimeSpan = New TimeSpan(0, 40, 0), .Priority = 1, .Quantity = New Integer() {15}, .Waypoint = New SimpleWaypoint(47.791548, -122.204411) } } } Dim result As OptimizeItinerary = Nothing

sorry if the above looks wired i have pasted again frm vs

Dim request As OptimizeItineraryRequest = New OptimizeItineraryRequest() With {
.Agents = New List(Of Agent)() From {
New Agent() With {
.Name = "Bob",
.Shifts = New List(Of Shift)() From {
New Shift() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 8, 0, 0),
.StartLocation = New SimpleWaypoint("1603 NW 89th St, Seattle, WA 98117, US"),
.EndTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.EndLocation = New SimpleWaypoint(47.7070790545669, -122.355226696231),
.Breaks = New Break() {New Break() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 12, 0, 0),
.EndTimeUtc = New DateTime(2022, 1, 1, 14, 0, 0),
.DurationTimeSpan = New TimeSpan(0, 30, 0)
}, New Break() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 16, 0, 0),
.EndTimeUtc = New DateTime(2022, 1, 1, 16, 30, 0)
}}
}
},
.Price = New Price() With {
.FixedPrice = 100,
.PricePerHour = 5,
.PricePerKM = 1
},
.Capacity = New Integer() {16}
},
New Agent() With {
.Name = "Charlie",
.Shifts = New List(Of Shift)() From {
New Shift() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 8, 0, 0),
.StartLocation = New SimpleWaypoint("1 Microsoft way, WA 98052, US"),
.EndTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.EndLocation = New SimpleWaypoint(47.7070790545669, -122.355226696231),
.Breaks = New Break() {New Break() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 12, 0, 0),
.EndTimeUtc = New DateTime(2022, 1, 1, 14, 0, 0),
.DurationTimeSpan = New TimeSpan(0, 30, 0)
}, New Break() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 16, 0, 0),
.EndTimeUtc = New DateTime(2022, 1, 1, 16, 30, 0)
}}
}
},
.Price = New Price() With {
.FixedPrice = 100,
.PricePerHour = 5,
.PricePerKM = 1
},
.Capacity = New Integer() {16}
},
New Agent() With {
.Name = "Terry",
.Shifts = New List(Of Shift)() From {
New Shift() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 8, 0, 0),
.StartLocation = New SimpleWaypoint(47.746135, -122.199314),
.EndTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.EndLocation = New SimpleWaypoint(47.746135, -122.199314),
.Breaks = New Break() {New Break() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 12, 0, 0),
.EndTimeUtc = New DateTime(2022, 1, 1, 14, 0, 0),
.DurationTimeSpan = New TimeSpan(0, 30, 0)
}, New Break() With {
.StartTimeUtc = New DateTime(2022, 1, 1, 16, 0, 0),
.EndTimeUtc = New DateTime(2022, 1, 1, 16, 30, 0)
}}
}
},
.Price = New Price() With {
.FixedPrice = 100,
.PricePerHour = 5,
.PricePerKM = 1
},
.Capacity = New Integer() {16}
}
},
.ItineraryItems = New List(Of OptimizeItineraryItem)() From {
New OptimizeItineraryItem() With {
.Name = "Customer 1",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 32, 0),
.Priority = 5,
.Quantity = New Integer() {4},
.Waypoint = New SimpleWaypoint("8712 Jones Pl NW, Seattle, WA 98117, US")
},
New OptimizeItineraryItem() With {
.Name = "Customer 2",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(1, 34, 0),
.Priority = 16,
.Quantity = New Integer() {-3},
.Waypoint = New SimpleWaypoint(47.6962193175262, -122.342180147243),
.DropOffFrom = New String() {"Customer 3"}
},
New OptimizeItineraryItem() With {
.Name = "Customer 3",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(1, 0, 0),
.Priority = 88,
.Quantity = New Integer() {3},
.Waypoint = New SimpleWaypoint(47.6798098928389, -122.383036445391)
},
New OptimizeItineraryItem() With {
.Name = "Customer 4",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 25, 0),
.Priority = 3,
.Quantity = New Integer() {-3},
.Waypoint = New SimpleWaypoint(47.6867440824094, -122.354711700877),
.DropOffFrom = New String() {"Customer 1"}
},
New OptimizeItineraryItem() With {
.Name = "Customer 5",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {-1},
.Waypoint = New SimpleWaypoint(47.6846639223203, -122.364839942855),
.DropOffFrom = New String() {"Customer 1"}
},
New OptimizeItineraryItem() With {
.Name = "Customer 6",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.668492, -122.19382)
},
New OptimizeItineraryItem() With {
.Name = "Customer 7",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.745673, -122.246702)
},
New OptimizeItineraryItem() With {
.Name = "Customer 8",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.60972, -122.143685)
},
New OptimizeItineraryItem() With {
.Name = "Customer 9",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.536975, -122.167035)
},
New OptimizeItineraryItem() With {
.Name = "Customer 10",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.594438, -122.311946)
},
New OptimizeItineraryItem() With {
.Name = "Customer 11",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.583784, -122.180084)
},
New OptimizeItineraryItem() With {
.Name = "Customer 12",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.658778, -122.047535)
},
New OptimizeItineraryItem() With {
.Name = "Customer 13",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.727659, -122.101104)
},
New OptimizeItineraryItem() With {
.Name = "Customer 14",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 18, 0),
.Priority = 1,
.Quantity = New Integer() {5},
.Waypoint = New SimpleWaypoint(47.701782, -122.298898)
},
New OptimizeItineraryItem() With {
.Name = "Customer 15",
.OpeningTimeUtc = New DateTime(2022, 1, 1, 9, 0, 0),
.ClosingTimeUtc = New DateTime(2022, 1, 1, 18, 0, 0),
.DwellTimeSpan = New TimeSpan(0, 40, 0),
.Priority = 1,
.Quantity = New Integer() {15},
.Waypoint = New SimpleWaypoint(47.791548, -122.204411)
}
}
}
Dim result As OptimizeItinerary = Nothing

commented

If you are using the NuGet package, it does not have this class. The NuGet package is old and hasn't been updated since 2018 (I doubt an update will be made).

What you can do instead is download the latest source code and reference the package locally within your solution.

commented

Ah yes I am using the nuget package
Ill see if i can add the source code instead.

Many Thanks