ESRI.ArcGIS.RuntimeManager.Bind(ESRI.ArcGIS.ProductCode.Desktop)
Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup ESRI.ArcGIS.RuntimeManager.Bind(ESRI.ArcGIS.ProductCode.Desktop) Dim aoi As AoInitialize = New AoInitializeClass() Dim productCode As esriLicenseProductCode = esriLicenseProductCode.esriLicenseProductCodeArcView If aoi.IsProductCodeAvailable(productCode) = esriLicenseStatus.esriLicenseAvailable Then aoi.Initialize(productCode) End If End Sub
Signed in members can post, follow updates, and more. New here? Register a free account.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.