Метод публикует слой в веб-службах ZuluServer.
Visual Basic:
Function PublishForWeb(Params As IZWebParams, bRemoveFlag As Boolean) As Long
Params - объект IZWebParams, описывающий параметры публикуемого слоя.
bRemoveFlag :
True - убирает слой из пространства имен.
False - добавляет/изменяет слой в пространстве имен.
При успехе публикации слоя в веб-службах ZuluServer метод вернет 0, в противном случае вернет -1.
Sub Layer_PublishForWeb 'задаем активный слой Set L = Zulu.ActiveMapDoc.Layers.Active 'создаем объект ZWebParams Set webParams = CreateObject("ZuluLib.ZWebParams") 'указываем интервал обновления webParams.SetInterval 10 'указываем отображение webParams.SetDisplayOptions 0 'указываем параметр доступа webParams.SetWebAccessFlag true 'указываем ZWS наименование слоя webParams.SetWebLayerName "Elekto" 'указываем пространство имен webParams.SetWebNamespace "ElektoSeti_Vologda" 'указываем правило редактирование через веб службы webParams.SetWebEditingDisabled false 'указываем расчетную модель webParams.SetModel 0 'указываем правило редактирование только через GPS в ZuluGIS Mobile webParams.SetMobileEditingGPSOnly false 'Публикуем слой в веб-службах output = L.PublishForWeb(webParams, false) MsgBox(output) End Sub