About the Vehicle routing problem solver Sample
[C#]
Program.cs
using System; using System.Collections.Generic; using System.Linq; using System.Windows.Forms; using ESRI.ArcGIS.esriSystem; namespace VRP_CSharp { static class Program { /// <summary> /// The main entry point for the application. /// </summary> [STAThread] static void Main() { if (!ESRI.ArcGIS.RuntimeManager.Bind(ESRI.ArcGIS.ProductCode.Engine)) { if (!ESRI.ArcGIS.RuntimeManager.Bind(ESRI.ArcGIS.ProductCode.Desktop)) { System.Windows.Forms.MessageBox.Show("This application could not load the correct version of ArcGIS."); return; } } LicenseInitializer aoLicenseInitializer = new LicenseInitializer(); if (!aoLicenseInitializer.InitializeApplication(new esriLicenseProductCode[] { esriLicenseProductCode.esriLicenseProductCodeEngine, esriLicenseProductCode.esriLicenseProductCodeArcView, esriLicenseProductCode.esriLicenseProductCodeArcEditor, esriLicenseProductCode.esriLicenseProductCodeArcInfo }, new esriLicenseExtensionCode[] { esriLicenseExtensionCode.esriLicenseExtensionCodeNetwork })) { System.Windows.Forms.MessageBox.Show("This application could not initialize with the correct ArcGIS license and will shutdown. LicenseMessage: " + aoLicenseInitializer.LicenseMessage()); aoLicenseInitializer.ShutdownApplication(); return; } Application.EnableVisualStyles(); Application.SetCompatibleTextRenderingDefault(false); frmVRPSolver mainForm = new frmVRPSolver(); // Check that the form was not already disposed of during initialization before running it. if (mainForm != null && !mainForm.IsDisposed) Application.Run(mainForm); aoLicenseInitializer.ShutdownApplication(); } } }
[Visual Basic .NET]
Program.vb
Imports Microsoft.VisualBasic Imports System Imports System.Collections.Generic Imports System.Windows.Forms Imports ESRI.ArcGIS.esriSystem Friend NotInheritable Class Program ''' <summary> ''' The main entry point for the application. ''' </summary> Private Sub New() End Sub <STAThread()> _ Shared Sub Main() If (Not ESRI.ArcGIS.RuntimeManager.Bind(ESRI.ArcGIS.ProductCode.Engine)) Then If (Not ESRI.ArcGIS.RuntimeManager.Bind(ESRI.ArcGIS.ProductCode.Desktop)) Then System.Windows.Forms.MessageBox.Show("This application could not load the correct version of ArcGIS.") End If End If Dim aoLicenseInitializer As LicenseInitializer aoLicenseInitializer = New LicenseInitializer 'ESRI License Initializer generated code. If (Not aoLicenseInitializer.InitializeApplication(New esriLicenseProductCode() {esriLicenseProductCode.esriLicenseProductCodeEngine, esriLicenseProductCode.esriLicenseProductCodeArcView, esriLicenseProductCode.esriLicenseProductCodeArcEditor, esriLicenseProductCode.esriLicenseProductCodeArcInfo}, _ New esriLicenseExtensionCode() {esriLicenseExtensionCode.esriLicenseExtensionCodeNetwork})) Then System.Windows.Forms.MessageBox.Show("This application could not initialize with the correct ArcGIS license and will shutdown. LicenseMessage: " + aoLicenseInitializer.LicenseMessage()) aoLicenseInitializer.ShutdownApplication() Return End If Application.EnableVisualStyles() Application.SetCompatibleTextRenderingDefault(False) Application.Run(New frmVRPSolver()) 'ESRI License Initializer generated code. 'Do not make any call to ArcObjects after ShutDownApplication() aoLicenseInitializer.ShutdownApplication() End Sub End Class