Latest Contributions by DavidLamb

I think your code would only be available to 10.3 and up. the parameter.filters property wasn't available in 10.2. Just as an FYI. Otherwise, it looks interesting! ... View more

If you are using a python add-in wizard, you can do something like this. On the first click, you store the envelopes in a class level property. If the list isn't empty then keep going through and setting extents. This worked on my machine running 10.2 import arcpy import pythonaddins class ButtonClass1(object):     """Implementation for zoomto_addin.button (Button)"""     def __init__(self):         self.enabled = True         self.checked = False         self.mxd = None         self.df = None         self.envelopes = []         self.lastIndex = 0     def onClick(self):         print "clicked"         if len(self.envelopes)<1:             self.mxd = arcpy.mapping.MapDocument('CURRENT')             self.df = arcpy.mapping.ListDataFrames(self.mxd, "Layers") [0]             print "getting stuff"             # find the selection set             SelLayer = arcpy.mapping.ListLayers(self.mxd,data_frame=self.df)[0] # first layer             fidSet = arcpy.Describe(SelLayer).FIDSet             if len(fidSet) == 0:                 arcpy.AddMessage("Nothing selected")             else:               # now cursor through it an get the geometries               # storing their extents into a list                 with arcpy.da.SearchCursor(SelLayer,"SHAPE@") as SCur:                     for feat in SCur:                         # I'm going to assume polygon/polyline                         self.envelopes.append(feat[0].extent) # grab the envelope                 print len(self.envelopes)                 self.lastIndex = 0                 self.setExtent         else:             self.setExtent()     def setExtent(self):         print len(self.envelopes)         print self.lastIndex         if self.lastIndex < (len(self.envelopes)-1):             self.df.extent = self.envelopes[self.lastIndex]             arcpy.RefreshActiveView()             self.lastIndex += 1         else:             self.lastIndex = 0             self.df.extent = self.envelopes[self.lastIndex]             arcpy.RefreshActiveView()             self.lastIndex += 1 ... View more

FYI, the Why option is available through the ArcCatalog view rather than ArcToolbox. ... View more

Thanks for the response.  I figured out what was missing.  But if you have any recommendations for debugging Python Toolboxes, please pass those along.  Is the "Why" option available to you? Thanks again, David ... View more

I think you have it correctly if your map control is named "MapMain". However, v2.1 and earlier do not support Binding for "Resolution", this is new to v2.2 Where is v2.2 available? Thanks, David ... View more

If anyone else is interested, the link above doesn't work, but you can download the javascript api proxy page here:  http://resources.esri.com/help/9.3/arcgisserver/apis/javascript/arcgis/help/jshelp_start.htm#jshelp/ags_proxy.htm I converted this over to vb.net since that is what I'm working in, minus the proxy.config file since I'm not working with tokens for my learning application.  I also restricted the proxy to working with a single uri.  I don't know if that is the best way to handle it, but in my readings it sounded like a good idea to limit what the page can be used for.  I used a generic handler and here is the code for the ProcessRequest Sub.  In your map xaml as Ali has done you can add a proxy tag, but just set it to "http://localhost:*current port number*/generichandler.ashx" Your *current port number* may change.  Or if you have a server you can host your handler there and change the url accordingly.    Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest         Dim response As HttpResponse = context.Response         Dim uri As String = HttpUtility.UrlDecode(context.Request.Url.Query.Substring(1))         If Not uri.Contains(urlStr) Then             response.StatusCode = 500             response.StatusDescription = "Wrong url detected"             response.Write("This proxy page is dedicated to a single url.")             response.End()             Return         End If         Dim req As System.Net.HttpWebRequest = DirectCast(System.Net.WebRequest.Create(uri), System.Net.HttpWebRequest)         req.Method = context.Request.HttpMethod         req.ServicePoint.Expect100Continue = False         If context.Request.InputStream.Length > 0 Then             Dim bytes(context.Request.InputStream.Length) As Byte             context.Request.InputStream.Read(bytes, 0, context.Request.InputStream.Length)             req.ContentLength = bytes.Length             Dim contType As String = context.Request.ContentType             If String.IsNullOrEmpty(contType) Then                 req.ContentType = "application/x-ww-form-urlencoded"             Else                 req.ContentType = contType             End If             Using outputStream As Stream = req.GetRequestStream()                 outputStream.Write(bytes, 0, bytes.Length)             End Using         End If         Dim serverResponse As System.Net.WebResponse = Nothing         Try             serverResponse = req.GetResponse()         Catch webExc As System.Net.WebException             response.StatusCode = 500             response.StatusDescription = webExc.Status.ToString()             response.Write(webExc.Response.ToString())             response.End()             Return         End Try         If Not serverResponse Is Nothing Then             response.ContentType = serverResponse.ContentType             Using byteStream As Stream = serverResponse.GetResponseStream()                 If serverResponse.ContentType.Contains("text") Or serverResponse.ContentType.Contains("json") Then                     Using sr As StreamReader = New StreamReader(byteStream)                         Dim strResponse As String = sr.ReadToEnd                         response.Write(strResponse)                     End Using                 Else                     Dim br As New BinaryReader(byteStream)                     Dim outb() As Byte = br.ReadBytes(serverResponse.ContentLength)                     br.Close()                     response.CacheControl = "no-cache"                     response.OutputStream.Write(outb, 0, outb.Length)                 End If                 serverResponse.Close()             End Using         End If         response.End()     End Sub Please let me know of any suggestions for improvement. Cheers, David ... View more

Thanks for your help, that worked for me.  I'll add a proxy to my application. Cheers, David ... View more

I don't have access to their servers/service.  I found their crossdomain file at http://sunlight.wygisc.uwyo.edu/crossdomain.xml.  It seems to provide access to their services.  Is there anything that would be prohibiting me from accessing it with silverlight.  I don't *think* there is anything wrong with my application since I was able to add a layer from another service and that worked fine.    <?xml version="1.0" ?>   <!DOCTYPE cross-domain-policy (View Source for full doctype...)> - <cross-domain-policy>   <site-control permitted-cross-domain-policies="all" />   <allow-access-from domain="*" to-ports="*" secure="true" />   <allow-http-request-headers-from domain="*.wygisc.uwyo.edu" headers="SOAPAction" secure="false" />   </cross-domain-policy> They don't have a clientaccesspolicy.xml file from what I could tell. Thanks for your response. Cheers, David ... View more