HOW TO
The ActiveX Connector allows a layer's rendering to override the map configuration file (*.axl) rendering.
Instructions provided explain how to re-render a layer using the ActiveX Connector.
Code:
dim oConn
set oConn = Server.CreateObject("aims.ArcIMSConnector")
oConn.ServerName = "localhost"
oConn.ServerPort = 5300
Code:
dim oMap
set oMap = Server.CreateObject("aims.Map")
oMap.InitMap oConn, "MyService"
Code:
oMap.Width=600
oMap.Height=300
Code:
dim oGroupRenderer, oLabelRenderer, oSimpleRenderer
set oGroupRenderer = Server.CreateObject("aims.GroupRenderer")
set oLabelRenderer = Server.CreateObject("aims.SimpleLabelRenderer")
set oSimpleRenderer = Server.CreateObject("aims.SimpleRenderer")
' Create Label Symbol
dim oTextSymbol
set oTextSymbol = Server.CreateObject("aims.TextSymbol")
oTextSymbol.Font="Arial"
oTextSymbol.FontSize=12
' Set the properties for the label renderer
oLabelRenderer.Symbol = oTextSymbol
oLabelRenderer.Field = "NAME"
' Create symbol for point layer, set properties
dim oPtSymbol
set oPtSymbol = Server.CreateObject("aims.SimpleMarkerSymbol")
oPtSymbol.Color = RGB(255,0,0) ' red
oPtSymbol.MarkerType = 1 ' triangle
oPtSymbol.Width = 10
' Set properties for simple renderer
oSimpleRenderer.Symbol = oPtSymbol
' Add the two new renderers to the group renderer
oGroupRenderer.Add oLabelRenderer
oGroupRenderer.Add oSimpleRenderer
Code:
dim oLayer, i
for i = 1 to oMap.Layers.Count
if oMap.Layers.Item(i).Id = "Cities" then
set oLayer = oMap.Layers.Item(i)
end if
next
oLayer.Renderer = oGroupRenderer
Code:
oMap.DoZoomToFeatures oLayer, "NAME", "'Los Angeles','New York'"
Code:
oMap.Refresh
response.write "<img url='" & oMap.GetImageURL() & "'>"
Article ID:000002363
Get help from ArcGIS experts
Download the Esri Support App