I am trying to refresh a WMS weather Layer....its not refreshing....read soemthing about disableCache or something...What am I missing?Thanks<esri:WmsLayer ID="Nexrad" Url="http://mesonet.agron.iastate.edu/cgi-bin/wms/nexrad/n0r.cgi?" Version="1.3.0"
SkipGetCapabilities="True" Initialized="Nexrad_Initialized" Opacity=".5" Visible="True" />
Private Sub UserControl_Loaded(ByVal sender As Object, ByVal e As RoutedEventArgs)
' Timer to refresh Weather
Dim localTimer As New DispatcherTimer()
AddHandler localTimer.Tick, AddressOf localTimer_Tick
localTimer.Interval = New TimeSpan(0, 0, 30)
End Sub
Private Sub localTimer_Tick(ByVal sender As Object, ByVal e As EventArgs)
Dim nexradWmsLayer As ESRI.ArcGIS.Client.Toolkit.DataSources.WmsLayer = Nothing
nexradWmsLayer = TryCast(MyMap.Layers("Nexrad"), ESRI.ArcGIS.Client.Toolkit.DataSources.WmsLayer)
nexradWmsLayer.Refresh()
End Sub
Private Sub Nexrad_Initialized(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim nexradWmsLayer As ESRI.ArcGIS.Client.Toolkit.DataSources.WmsLayer = Nothing
nexradWmsLayer = TryCast(MyMap.Layers("Nexrad"), ESRI.ArcGIS.Client.Toolkit.DataSources.WmsLayer)
Dim VisibleWmsLayers As String() = {"nexrad-n0r-900913-m05m"}
nexradWmsLayer.Layers = VisibleWmsLayers
End Sub