Hi,
I have a peculiar problem with some WMS services using the daily build - the same code sends a different request to the wms server when comparing the release and daily builds of thinkgeo - in the daily build the BBOX parameters have been switched around (X and Y muddled up) compared to the actual map area in view
Below are the 2 strings that are sent to the wms server - only difference is replacing the MapSuiteCore.dll
Daily DLL
==========
map.tgsnopec.com/ArcGIS/services/27th_Licence_Round_Position/MapServer/WMSServer?REQUEST=GetMap&WIDTH=656&HEIGHT=534&LAYERS=0&FORMAT=image/png&TRANSPARENT=TRUE&BBOX=6215798.45708755,-49098.702847145,6891223.92808164,780637.456276681&CRS=EPSG:4326&VERSION=1.1.1&STYLES=&EXCEPTIONS=application/vnd.ogc.se_xml&srs=EPSG:23031
Release DLL
============
map.tgsnopec.com/ArcGIS/services/27th_Licence_Round_Position/MapServer/WMSServer?REQUEST=GetMap&BBOX=-49098.702847145,6215798.45708755,780637.456276681,6891223.92808164&WIDTH=656&HEIGHT=534&LAYERS=0&FORMAT=image/png&TRANSPARENT=TRUE&CRS=EPSG:4326&VERSION=1.1.1&STYLES=&EXCEPTIONS=application/vnd.ogc.se_xml&srs=EPSG:23031
the code to add the wms layer is:
Dim myLayer1 As New WMSRasterLayerTGS(New Uri(wmsUrl))
myLayer1.Proxy = System.Net.WebProxy.GetDefaultProxy()
myLayer1.ActiveLayerNames.Add(layer)
myLayer1.Name = caption
myLayer1.TimeoutInSecond = 30
myLayer1.UpperThreshold = Double.MaxValue
myLayer1.LowerThreshold = 0
myLayer1.KeyColors.Add(GeoColor.StandardColors.White)
myLayer1.IsTransparent = True
myLayer1.Exceptions = "application/vnd.ogc.se_xml"
myLayer1.Parameters.Add("format", "image/png")
myLayer1.Parameters.Add("srs", utmzone)
myLayer1.Parameters.Add("version", "1.1.1")
Dim opacity As Double = 255
Double.TryParse(menuWMSOpacity.Text, opacity)
If opacity < 0 Then opacity = 0
If opacity < 255 Then
opacity = opacity * 255 / 100
End If
If opacity > 255 Then opacity = 255
myLayer1.Transparency = opacity
myLayer1.Open()
Dim sOverlay As New CustomShapeLayerOverlay
sOverlay.Name = caption
sOverlay.Layers.Add(myLayer1.Name, myLayer1)
Map1.Overlays.Add(caption, sOverlay)
Any ideas?
Thanks,
Jeremy