YouTube | Facebook | X(Twitter) | RSS

GIS サーバのプロパティを取得・設定

2016/9/1 (木)

ArcGIS Server 10 以前を対象

Public Sub GetGISServerConnection()
    Dim pGISServerConnection As IGISServerConnection
    Set pGISServerConnection = New GISServerConnection
    pGISServerConnection.Connect "zeke"
     
    Dim pServerObjectAdmin As IServerObjectAdmin
    Set pServerObjectAdmin = pGISServerConnection.ServerObjectAdmin
     
    ' create the new configuration
    Dim pConfiguration As IServerObjectConfiguration2
    Set pConfiguration = pServerObjectAdmin.GetConfiguration("test", "MapServer")   '既存のサービスを取得する場合
'    Set pConfiguration = pServerObjectAdmin.CreateConfiguration                     '接続情報を新規に作成する場合
     
'    pConfiguration.Name = "California"
'    pConfiguration.TypeName = "MapServer"
     
    Dim pPropertySet As IPropertySet
    Set pPropertySet = pConfiguration.Properties
'    Set pPropertySet = pConfiguration.RecycleProperties
'    Set pPropertySet = pConfiguration.Info
'    Set pPropertySet = pConfiguration.ExtensionInfo
'    Set pPropertySet = pConfiguration.ExtensionProperties("MapServer")
     
    'PropertySetを表示
    Dim varNames As Variant, varValues As Variant
    pPropertySet.GetAllProperties varNames, varValues
    Dim i As Long
    For i = 0 To pPropertySet.Count - 1
        Debug.Print varNames(i), varValues(i)
    Next i
 
'    'プロパティを新規に設定する場合
'    pPropertySet.SetProperty "LocatorWorkspacePath", "\\melange\Geocoding\California"
'    pPropertySet.SetProperty "Locator", "California"
'    pPropertySet.SetProperty "SuggestedBatchSize", "500"
'
'    pConfiguration.IsPooled = True
'    pConfiguration.MinInstances = 1
'    pConfiguration.MaxInstances = 1
'    pConfiguration.WaitTimeout = 10
'    pConfiguration.UsageTimeout = 120
'
    '作成した設定を追加
'    pServerObjectAdmin.AddConfiguration pConfiguration
 
End Sub
'参考:IServerObjectConfiguration2::Properties Property > Example
  • この記事を書いた人

羽田 康祐

伊達と酔狂のGISエンジニア。GIS上級技術者、Esri認定インストラクター、CompTIA CTT+ Classroom Trainer、潜水士、PADIダイブマスター、四アマ。WordPress は 2.1 からのユーザーで歴だけは長い。 代表著書『"地図リテラシー入門―地図の正しい読み方・描き方がわかる』 GIS を使った自己紹介はこちら。ESRIジャパン(株)所属、元青山学院大学非常勤講師を兼務。日本地図学会第31期常任委員。発言は個人の見解です。

-プログラミング, ArcGIS
-,