ShowImportTerritoriesWizard method
Opens the Import Territories Wizard; similar to clicking Territories on the Data menu, selecting Create from your own set of data, and then selecting Import your source file. Returns a DataSet object for a territories set, if one is created. Returns Nothing if the user cancels out of the wizard.
Applies to
Collections: DataSets
Syntax
object.ShowImportTerritoriesWizard([HWndParent], [DataSourceMoniker], [Delimeter], [ImportFlags])
Parameters
Part | Description | |||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
object | Required. An expression that returns a DataSets collection. | |||||||||||||||||||||||||||
HWndParent | Optional Long. Handle of the user's window, to allow the Import Territories Wizard to be modal to a window in the calling application, rather than MapPoint.
Note Do not use a handle for a window other than the MapPoint window if the MapPoint window is visible. | |||||||||||||||||||||||||||
DataSourceMoniker | Optional String. File name to import. Can also provide information on which part of the file to import. See the DataSourceMoniker syntax topic for the correct syntax to use for this parameter. If a file name is not specified, the user interface will prompt the user for a file to import. | |||||||||||||||||||||||||||
Delimiter | Optional GeoDelimiter. Characters that separate individual fields. Can be one or more characters. Required for importing text (.txt) files. Default is geoDelimiterDefault.
| |||||||||||||||||||||||||||
ImportFlags | Optional Long. Provides information about the DataSourceMoniker and the data in the file. Multiple values can be passed by using the Visual Basic "Or" operator (for example, geoImportExcelNamedRange Or geoImportFirstRowIsNotHeadings ).
|
Remarks
To import data that defines a set of territories as a DataSet object, use the ImportTerritories method on a DataSets collection.
Example
Sub ShowWizard()
Dim objApp As New MapPoint.Application
objApp.Visible = True
objApp.UserControl = True
Dim objDS As MapPoint.DataSet
With objApp.ActiveMap.DataSets
Set objDS = .ShowImportTerritoriesWizard
End With
End sub
Example using parameters
Sub ShowWizard()
Dim objApp As New MapPoint.Application
objApp.Visible = True
objApp.UserControl = True
Dim strFile As String
Dim objDS As MapPoint.DataSet
With objApp.ActiveMap.DataSets
'Excel sheet
strFile = objApp.Path & "\Samples\Terrs.xls!Sheet1!A1:E127"
Set objDS = .ShowImportTerritoriesWizard(, strFile, , geoImportExcel)
End With
End sub