Экспортирует данные слоя в файлы формата MIF/MID.

Применяется к:

ZuluTools

Синтаксис:

Visual Basic:

Function ExportToMIF(LayerPath As String, MifPath As String) As Boolean

LayerPath - путь до экспортируемого слоя.

MifPath - путь к папке, в которую будет экспортирован слой.

Описание:

Метод возвращает True, если операция прошла успешно, в противном случае метод возвращает False. Метод аналогичен команде Файл/Экспорт/MapInfoMIF системы Zulu.

Пример:

Private Sub Command18_Click()
           
    Dim tools As ZuluTools

Set tools = New            ZuluTools
    'произведем экспорт в формат MIF слоя Doma

If tools.ExportToMIF("d:\nastya\new\doma.b00", "d:\nastya\new\456.mif") = True Then
        MsgBox "Слой экспортирован удачно"
    Else: MsgBox "Ошибка экспорта"
    End If

End Sub