Импортирует данные из формата Shape в новый слой Zulu.
Visual Basic:
Function ImportFromShape(ShpPath As String, LayerPath As String, LayerName As String) As Boolean
MifPath - полный путь до импортируемого SHP файла.
LayerPath - полный путь или URL слоя, куда будет импортироваться файл.
LayerName - пользовательское название импортированного слоя.
Метод возвращает True, если операция прошла успешно, в противном случае метод возвращает False. Метод аналогичен команде Файл/Импорт/ShapeSHP системы Zulu.
Private Sub Command19_Click() Dim tooll As ZuluTools Set tooll = New ZuluTools If tooll.ImportFromShape("d:\nastya\new\123_polygon", "d:\nastya\new\doma.b00", "дома") = True Then MsgBox "Слой успешно импортирован" Else: MsgBox "Ошибка импорта" End If End Sub