linq to sql - online - Usando Linq a Sql para encontrar ZipCodes dentro de la distancia Radius

linq where in list c#

Question

Tengo una tabla de base de datos de códigos postales con sus Lat / Longs. Estoy tratando de encontrar algún código que muestre una consulta que tome un código postal y x millas y luego devuelva un conjunto de resultados que incluyen todos los códigos postales que están dentro de ese radio (la precisión no es muy importante, siempre y cuando esté cerca).

¿Se puede hacer esto con una consulta de Linq a SQL, así que no tengo que usar un procedimiento almacenado?

Answer 1

Lo descubrí y en realidad no fue tan difícil una vez que encontré la ecuación.

Public Function SearchStudents(ByVal SearchZip As String, ByVal Miles As Double) As IEnumerable(Of Student)
                Dim dc As New IMDataContext()

                Dim lat As Double
                Dim lng As Double
                Dim maxlat As Double
                Dim minlat As Double
                Dim maxlng As Double
                Dim minlng As Double

                Dim zip As ZipCode = (From z In dc.ZipCodes Where z.ZipCode = SearchZip).SingleOrDefault()

                lat = zip.Latitude
                lng = zip.Longitude

                maxlat = lat + Miles / 69.17
                minlat = lat - (maxlat - lat)
                maxlng = lng + Miles / (Math.Cos(minlat * Math.PI / 180) * 69.17)
                minlng = lng - (maxlng - lng)

                Dim ziplist = From z In dc.ZipCodes Where z.Latitude >= minlat _
                       And z.Latitude <= maxlat _
                       And z.Longitude >= minlng _
                       And z.Longitude <= maxlng Select z.ZipCode

                Return From i In dc.Students Where ziplist.Contains(i.Zip)
            End Function