sql地址寻路算法(省市区路)

最近无意翻开4年前做过的一个功能，就是搜集全国各城市各个区（县）的路（XX路、XX道、XX街、XX镇、XX乡、XX屯、XX村、XX社）。众所周知，我们都可以在网上找到省、市、区（县）这三级联动的数据，可是就并没有关于某个城市的某些区（县）下所对应的路（以下所有的路，道，街，镇，乡，屯，村，社统称为路）的数据，不过我们可以找到一些有地址的网站，例如大众点评网，里面就有很多一些饮食店等的具体地址。可以写个爬虫程序，把所有的详细地址先写进数据库的某个表中，然后再执行算法，把地址中有包含路、道、街、镇、乡、屯、村、社等属于第四级的数据写进对应的数据表（当然必须把第四级的数据对应到第三级区（县））。

1、首先需要建五张表（一个用来存放地址的表Address，一个用来存放全国的所有的省Province，一个用来存放属于省的城市City，一个用来存放属于城市的区(县)District，一个用来存放属于区的路Road）。下面是数据表关系图：

所有的表中的FID是外键表的ID，其中省Province的FID暂时没用到可忽略，其中flag是一个标志，如0表示新加，1表示修改，2表示删除等，shid和shengId是对应到其它表的，如某个城市的邮政编码，主要是用来搜集它们的一些对应的数据而已，这里可不考虑。下面是数据库查询的数据展示图：

2.其次是写一个根据输入的地址，返回省市区路四级联动的数据，然后把第四级路写进Road这个表并且把它的外键FID对应到第三级District区的主键ID

这里使用存储过程来处理，好了，那么问题就来了，执行的地址有好几种情况，在插入路这个数据之前需要对地址进行查找，有五种查找方式：

需要注意城市是否为直辖市（目前直辖市有四个：重庆市,北京市,天津市,上海市）

1）查找方式——省市区路，这个是最理想的，因为地址中已有前面三级的数据，首先找到省，然后找市，再找区，最后找路，如果路不存在就把路插入到Road表，返回省市区路

2）查找方式——省区路，这里只有省和区，首先找出省，然后找区，再根据区找到其所对应的城市，最后找路，如果路不存在就把路插入到Road表，返回省市区路

3）查找方式——省市路，这里只有省和市，于上面两种方式来说是比较复杂，首先找出省，然后找市，再根据路来找出对应的区，如果路不存在就把路插入到Road表，返回省市路

如果存在，则可找出区，返回省市区路。不存在时只能手工更正。

4）查找方式——市区路，这里只有市和区，首先找出市，然后根据市再找省，最后找路，如果路不存在就把路插入到Road表，返回省市区路

5）查找方式——市路，这里只有市，于上面四种方式是最复杂的，首先找出市，如果不是直辖市就找省，然后根据路来找区，如果路不存在就把路插入到Road表，返回省市路

如果存在，则可找出区，返回省市区路。不存在时只能手工更正。

以上是返回省市区路的五种查找方式，下面是存储过程：

GetAddress是查找方式的存储过程，返回省市区路，代码：

 ALTER pROCEDURE [dbo].[GetAddress]

 @address varchar(100),

  @NProvinceName varchar(30) OUTPUT,

  @NCityName     varchar(30) OUTPUT,

  @NDistrictName varchar(30) OUTPUT,

  @NRoadName     varchar(50) OUTPUT,

  @remain        varchar(50) OUTPUT,

  @PostCode      varchar(7) OUTPUT,

  @Road          varchar(100) output,    --新增，要插入road的路名

  @method        int        output,

  @number        int         output,

  @insert        bit   =1           --新增，是否插入

 AS

 BEGIN

 set @address=replace(@address,' ','');    --空格

 set @address=replace(@address,'    ','');    --制表符

 set @address=replace(@address,'０','');    --数字

 set @address=replace(@address,'１','');    --数字

 set @address=replace(@address,'２','');    --数字

 set @address=replace(@address,'３','');    --数字

 set @address=replace(@address,'４','');    --数字

 set @address=replace(@address,'５','');    --数字

 set @address=replace(@address,'６','');    --数字

 set @address=replace(@address,'７','');    --数字

 set @address=replace(@address,'８','');    --数字

 set @address=replace(@address,'９','');    --数字

   set @method=1

   set @number=0

   create table #temp(NProvinceName varchar(30),NCityName varchar(30),NDistrictName varchar(30),

                      NRoadName varchar(50),remain  varchar(50),PostCode varchar(7) ,Road varchar(100),method int,number int)

   while @method<=5

   begin

     exec ResAddress @address,@NProvinceName output,@NCityName output,

                   @NDistrictName output,@NRoadName output,@remain output,@PostCode output,@Road output,@method output,@number output

     insert into #temp values (@NProvinceName,@NCityName,@NDistrictName,@NRoadName,@remain,@PostCode,@Road,@method,@number)

     select @NProvinceName=null,@NCityName=null,@NDistrictName=null,@NRoadName=null,@remain=null,@PostCode=null,@number=0,@Road=null

     set @method=@method+1

   end 

 /*

  select top 1 @NProvinceName=NProvinceName,@NCityName=NCityName,@NDistrictName=NDistrictName,

           @NRoadName=NRoadName,@remain=remain,@PostCode=PostCode ,@method=method,@number=number,@Road=Road from #temp order by number desc

 */

  select top 1 @NProvinceName=dbo.F_Convert(NProvinceName,0),@NCityName=dbo.F_Convert(NCityName,0),@NDistrictName=dbo.F_Convert(NDistrictName,0),

               @NRoadName=dbo.F_Convert(NRoadName,0),@remain=dbo.F_Convert(remain,0),@PostCode=dbo.F_Convert(PostCode,0) ,

               @method=dbo.F_Convert(method,0),@number=dbo.F_Convert(number,0),@Road=dbo.F_Convert(Road,0) from #temp order by number desc

  if (@Road is not null) and (@insert=1)

     begin

       if not exists (select * from road where fid=left(@road,36) and title=RIGHT(@road,LEN(@ROAD)-36) and text=RIGHT(@road,LEN(@ROAD)-36))

       insert into Road(fid,title,flag,text) values(left(@road,36),RIGHT(@road,LEN(@ROAD)-36),2,RIGHT(@road,LEN(@ROAD)-36))

     end

   drop table #temp

 END

ResAddress是查找方式中需要调用的存储过程，其中有number这个返回一个数字，数字越大表示查找的难度就越大，代码：

 ALTER pROCEDURE [dbo].[ResAddress]

 @address varchar(100),

  @NProvinceName varchar(30) OUTPUT,

  @NCityName     varchar(30) OUTPUT,

  @NDistrictName varchar(30) OUTPUT,

  @NRoadName     varchar(50) OUTPUT,

  @remain        varchar(50) OUTPUT,

  @PostCode      varchar(7) OUTPUT,

  @Road          varchar(100) output,    --新增，要插入road的路名

  @method        int        output,

  @number        int        output

 AS

 BEGIN

 DECLARE @id            varchar(36)

 declare @fid           varchar(36)

 declare @text          varchar(30)

 declare @NAddress      varchar(200)

 set @NAddress=@address

 if @method=1    --查找方式 省市区路

 begin

 select top 1 @NProvinceName=title ,@id=id,@text=text from province where left(@Address,len(text)) like '%'+text+'%'  order by len(text) desc

   if (@NProvinceName is not null)

   begin

       set @number=@number+1                   --找到省计数加1

       select @id=id from province where title=@NProvinceName and shengid is not null

       set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

   end 

 select top 1 @NCityName=title,@id=id,@fid=fid ,@text=text from city where left(@Address,len(text)) like '%'+text+'%'  and city.fid=@id order by len(text) desc

     if (@NCityName is not null)

     begin

        set @number=@number+1

        select @id=id from city where title=@NCityName and shiid is not null

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

     end

 select top 1 @NDistrictName=title,@id=id,@fid=fid,@text=text from district where left(@Address,len(text)) like '%'+text+'%' and district.fid=@id order by len(text) desc

     if (@NDistrictName is not null)

     begin

        set @number=@number+1

         select @id=id from district where title=@NDistrictName and shiid is not null

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

     end

 select top 1 @NRoadName=title,@fid=fid,@id=id ,@PostCode=PostCode,@text=text from Road where left(@Address,len(text)) like '%'+text+'%' and road.fid=@id order by len(text) desc

     if (@NRoadName is not null)

     begin

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

        set @number=@number+1

     end

 if @text is not null

 set @remain=right(@NAddress,len(@NAddress)-charindex(@text,@NAddress)-len(@text)+1)

 else

 set @remain=@Address

 if (@NRoadName is null) and (@NDistrictName is not null)

     goto GetRoad

 else

     goto finished

 end

 if @method=2                    --查找方式 省区路

 begin

   select top 1 @NProvinceName=title ,@id=id,@text=text from province where left(@Address,len(text)) like '%'+text+'%' order by len(text) desc

   if (@NProvinceName is not null)

   begin

       set @number=@number+1                   --找到省计数加1

       select @id=id from province where title=@NProvinceName and shengid is not null --找省的标准ID

       set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

   end 

   select top 1 @NDistrictName=title,@id=id,@fid=fid,@text=text from district where left(@Address,len(text)) like '%'+text+'%'

   and  district.fid in (select id from city where city.fid=@id) order by len(text) desc

     if (@NDistrictName is not null)

     begin

        select @id=id from district where title=@NDistrictName and shiid is not null   --找区的标准ID

        set @number=@number+1

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

     end

   SELECT @NCityName=title FROM City where id=@fid     --返回查找市名

   if  (@NCityName is not null)

   set @number=@number+1

   select top 1 @NRoadName=title,@fid=fid,@id=id ,@PostCode=PostCode,@text=text from Road where left(@Address,len(text)) like '%'+text+'%'

   and Road.fid=@id order by len(text) desc

     if (@NRoadName is not null)

     begin

        set @number=@number+1

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

     end

 if @text is not null

 set @remain=right(@NAddress,len(@NAddress)-charindex(@text,@NAddress)-len(@text)+1)

 else

 set @remain=@Address

 if (@NRoadName is null) and (@NDistrictName is not null)

     goto GetRoad

 else

     goto finished

 end

 if @method=3 --查找方式 省市路

 begin

   select top 1 @NProvinceName=title ,@id=id,@text=text from province where left(@Address,len(text)) like '%'+text+'%' order by len(text) desc

   if (@NProvinceName is not null)

   begin

       set @number=@number+1                   --找到省计数加1

       select @id=id from province where title=@NProvinceName and shengid is not null --找省的标准ID

       set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

   end 

  if @NProvinceName in ('重庆市','北京市','天津市','上海市')    --新增这个判断 2009-08-25

  begin

    select top 1 @NCityName=title,@id=id,@fid=fid,@text=text from city where city.fid=@id

    set @number=@number+1

  end

  else

  begin

  select top 1 @NCityName=title,@id=id,@fid=fid,@text=text from city where left(@Address,len(text)) like '%'+text+'%'

  and city.fid=@id order by len(text) desc

     if (@NCityName is not null)

     begin

        set @number=@number+1

        select @id=id from city where title=@NCityName and shiid is not null      --找市的标准ID

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

     end

  end

   select top 1 @NRoadName=title,@fid=fid,@id=id ,@PostCode=PostCode,@text=text from Road where left(@Address,len(text)) like '%'+text+'%'

   and road.fid in (select id from district where district.fid=@id) order by len(text) desc

     if (@NRoadName is not null)

     begin

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

        set @number=@number+1

     end

  select @NDistrictName=title from district where id=@fid    --返回查找区名

  if (@NDistrictName is not null)

     set @number=@number+1

 if @text is not null

 set @remain=right(@NAddress,len(@NAddress)-charindex(@text,@NAddress)-len(@text)+1)

 else

 set @remain=@Address

 if (@NRoadName is null) and (@NDistrictName is not null)

     goto GetRoad

 else

     goto finished

 end

 if @method=4    --查找方式 市区路

 begin

  select top 1 @NCityName=title,@id=id,@fid=fid ,@text=text from city where left(@Address,len(text)) like '%'+text+'%' order by len(text) desc

     if (@NCityName is not null)

     begin

        select @id=id from city where title=@NCityName and shiid is not null      --找市的标准ID

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

        set @number=@number+1

     end

 select @NProvinceName=title from Province where id=@fid             --返回找省名

 if (@NProvinceName is not null)

 begin

    set @number=@number+1

 end

 select top 1 @NDistrictName=title,@id=id,@fid=fid, @text=text from district where left(@Address,len(text)) like '%'+text+'%'

 and  district.fid=@id order by len(text) desc

     if (@NDistrictName is not null)

     begin

        set @number=@number+1

        select @id=id from district where title=@NDistrictName and shiid is not null   --找区的标准ID

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

     end

 select top 1 @NRoadName=title,@fid=fid,@id=id ,@PostCode=PostCode,@text=text from Road where left(@Address,len(text)) like '%'+text+'%'

 and road.fid=@id order by len(text) desc

     if (@NRoadName is not null)

     begin

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

        set @number=@number+1

     end

 if @text is not null

 set @remain=right(@NAddress,len(@NAddress)-charindex(@text,@NAddress)-len(@text)+1)

 else

 set @remain=@Address

 if (@NRoadName is null) and (@NDistrictName is not null)

     goto GetRoad

 else

     goto finished

 end 

 if @method=5  --查找方式 ：市-路

 begin

    select top 1 @NCityName=title,@id=id,@fid=fid , @text=text from city where left(@Address,len(text)) like '%'+text+'%' order by len(text) desc

     if (@NCityName is not null)

     begin

        set @number=@number+1

        select @id=id from city where title=@NCityName and shiid is not null      --找市的标准ID

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

     end

    select @NProvinceName=title from Province where id=@fid             --返回找省名

    if (@NProvinceName is not null)

        set @number=@number+1

   select top 1 @NRoadName=title,@fid=fid,@id=id ,@PostCode=PostCode ,@text=text from Road where left(@Address,len(text)) like '%'+text+'%'

   and road.fid in (select id from district where district.fid=@id) order by len(text) desc

     if (@NRoadName is not null)

     begin

        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'')

        set @number=@number+1

     end

   select @NDistrictName=title from district where id=@fid    --返回查找区名

   if (@NDistrictName is not null)

       set @number=@number+1

 if @text is not null

 set @remain=right(@NAddress,len(@NAddress)-charindex(@text,@NAddress)-len(@text)+1)

 else

 set @remain=@Address

 if (@NRoadName is null) and (@NDistrictName is not null)

     goto GetRoad

 else

     goto finished

 end 

 GetRoad:                     --新增将返回@road

    if charindex('路',@Address)>0

      set @Road=left(@address,charindex('路',@Address))

    else if  charindex('道',@Address)>0

      set @Road=left(@address,charindex('道',@Address))

    else if  charindex('街',@Address)>0

      set @Road=left(@address,charindex('街',@Address))

    else if  charindex('镇',@Address)>0

      set @Road=left(@address,charindex('镇',@Address))

    else if  charindex('乡',@Address)>0

      set @Road=left(@address,charindex('乡',@Address))

    else if  charindex('屯',@Address)>0

      set @Road=left(@address,charindex('屯',@Address))

    else if  charindex('村',@Address)>0

      set @Road=left(@address,charindex('村',@Address))

    else if  charindex('社',@Address)>0

      set @Road=left(@address,charindex('社',@Address))

  set @road=@id+@road

 finished:

 END

execAddress是执行存储过程，根据输入的地址返回详细的地址，代码：

 ALTER Procedure [dbo].[execAddress]

 @inputaddress varchar(100)

 AS

 DECLARE    @return_value int,

         @NProvinceName varchar(30),

         @NCityName varchar(30),

         @NDistrictName varchar(30),

         @NRoadName varchar(50),

         @remain varchar(50),

         @PostCode varchar(7),

         @Road varchar(100),

         @method int,

         @number int

 EXEC    @return_value = [dbo].[GetAddress]

         @address = @inputaddress,

         @NProvinceName = @NProvinceName OUTPUT,

         @NCityName = @NCityName OUTPUT,

         @NDistrictName = @NDistrictName OUTPUT,

         @NRoadName = @NRoadName OUTPUT,

         @remain = @remain OUTPUT,

         @PostCode = @PostCode OUTPUT,

         @Road = @Road OUTPUT,

         @method = @method OUTPUT,

         @number = @number OUTPUT

以下是测试，根据输入的地址返回省市区路的详细地址，这里就只截图：

1.输入重庆新华路41-43号，点转换，执行存储过程execAddress，把返回的地址显示在输出地址里，如下图

这里是第五种查找方式（市路）也可能是第三种查找方式（省市路）。

2.输入广州海珠区广州大道客村墩和，返回广东省广州市海珠区广州大道客村墩和，如下图：

这里是第四种查找方式（市区路）。

以上就是介绍查找地址的方法，还没用到address表，这个表是前面所说的用来搜集有详细地址的，具体需要写一个网页爬虫的程序，去爬爬有地址的网站，如大众点评网，这里就介绍这么多了，有写得不好的还望各位手下留情~

sql地址寻路算法(省市区路)的更多相关文章

【转载】 A* 寻路算法 (个人认为最详细,最通俗易懂的一个版本)
原文地址: http://www.cppblog.com/christanxw/archive/2006/04/07/5126.html =============================== ...
A星寻路算法-Mind&Hand（C++）
//注1:Mind & Hand,MIT校训,这里指的理解与实现(动脑也动手) //注2:博文分为两部分:(1)理解部分,为参考其他优秀博文的摘要梳理:(2)代码部分,是C++代码实现的,源码 ...
A* 寻路算法[转载]
A* 寻路算法转载地址:http://www.cppblog.com/christanxw/archive/2006/04/07/5126.html 原文地址: http://www.gamedev ...
三角网格上的寻路算法Part.1—Dijkstra算法
背景最近在研究中产生了这样的需求:在三角网格(Mesh)表示的地形图上给出两个点,求得这两个点之间的地面距离,这条距离又叫做"测地线距离(Geodesic)".计算三角网格模型表 ...
A星寻路算法介绍
你是否在做一款游戏的时候想创造一些怪兽或者游戏主角,让它们移动到特定的位置,避开墙壁和障碍物呢? 如果是的话,请看这篇教程,我们会展示如何使用A星寻路算法来实现它! 在网上已经有很多篇关于A星寻路算法 ...
A*寻路算法
对于初学者而言,A*寻路已经是个比较复杂的算法了,为了便于理解,本文降低了A*算法的难度,规定只能横竖(四方向)寻路,而无法直接走对角线,使得整个算法更好理解. 简而言之,A*寻路就是计算从起点经过该 ...
js实现A*寻路算法
这两天在做百度前端技术学院的题目,其中有涉及到寻路相关的,于是就找来相关博客进行阅读. 看了Create Chen写的理解A*寻路算法具体过程之后,我很快就理解A*算法的原理.不得不说作者写的很好,通 ...
用简单直白的方式讲解A星寻路算法原理
很多游戏特别是rts,rpg类游戏,都需要用到寻路.寻路算法有深度优先搜索(DFS),广度优先搜索(BFS),A星算法等,而A星算法是一种具备启发性策略的算法,效率是几种算法中最高的,因此也成为游戏中 ...
A*寻路算法的探寻与改良（一）
A*寻路算法的探寻与改良(一) by:田宇轩第一部分:这里我们主 ...

随机推荐

【NOI 2015】软件包管理器
[题目链接] 点击打开链接 [算法] 树链剖分,子树的DFS序也是连续的一段要注意细节! [代码] #include<bits/stdc++.h> using namespace std ...
flask logging 最佳实践
flask项目中, 你可以使用python 的 logging模块实现记录日志. 也可以使用 flask 基于logging模块封装过的app.logger实现. 直接上代码 config.py im ...
Java泛型简明教程
泛型是Java SE 5.0中引入的一项特征,自从这项语言特征出现多年来,我相信,几乎所有的Java程序员不仅听说过,而且使用过它.关于Java泛型的教程,免费的,不免费的,有很多.我遇到的最好的教材 ...
vim 退出命令(保存、放弃保存)
在命令模式中,连按两次大写字母Z,若当前编辑的文件曾被修改过,则Vi保存该文件后退出,返回到shell:若当前编辑的文件没被修改过,则Vi直接退出, 返回到shell. 在末行模式下,输入命令 : ...
任务41：Individual authentication 模板
使用命令行创建项目会自动加上ef core和Identity core代码的示例默认创建mvc是不带Identity的 dotnet new -help:查看可用的命令: -au:Individu ...
UVaLive 7461 Separating Pebbles (暴力)
题意:给出平面上的两类点,判断是否能画一条直线将两类点完全分割开来. 析:用暴力去枚举任意两点当作直线即可. 代码如下: #pragma comment(linker, "/STACK:10 ...
csacademy Round #36(模拟+最坏情况)
传送门题意给出n种袜子,每种袜子个数a[i],两只相同种类袜子配成一对,询问至少拿出多少只袜子能确保配出k对袜子分析 In order to find out the minimum numbe ...
poj3181【完全背包+整数拆分】
题意: 给你一个数n,在给你一个数K,问你这个n用1-k的数去组合,有多少种组合方式. 思路: 背包重量就是n: 那么可以看出 1-k就是重物,价值是数值,重量是数值. 每个重物可以无限取,问题转化为 ...
bzoj 5019: [Snoi2017]遗失的答案【dp+FWT】
满足GL的组合一定包含GL每个质因数最大次幂个最小次幂,并且能做限制这些数不会超过600个然后质因数最多8个,所以可以状压f[s1][s2]为选s1集合满足最大限制选s2集合满足最小限制 dfs一下 ...
Linux下的录屏软件Kazam
发现Ubuntu下一个很好用的录屏软件kazam,Ubuntu官方源中就有. 1.安装 $ sudo apt-get install kazam 2.使用使用很简单,除了截图,还可以录制屏幕视频.既 ...

sql地址寻路算法(省市区路)

sql地址寻路算法(省市区路)的更多相关文章

随机推荐

热门专题