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,'0',''); --数字
set @address=replace(@address,'1',''); --数字
set @address=replace(@address,'2',''); --数字
set @address=replace(@address,'3',''); --数字
set @address=replace(@address,'4',''); --数字
set @address=replace(@address,'5',''); --数字
set @address=replace(@address,'6',''); --数字
set @address=replace(@address,'7',''); --数字
set @address=replace(@address,'8',''); --数字
set @address=replace(@address,'9',''); --数字 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:田宇轩 第一部分:这里我们主 ...
随机推荐
- Java必知必会:异常机制详解
一.Java异常概述 在Java中,所有的事件都能由类描述,Java中的异常就是由java.lang包下的异常类描述的. 1.Throwable(可抛出):异常类的最终父类,它有两个子类,Error与 ...
- Docker 概念及基本用法
Docker 概念及基本用法 一. 本节内容简介 本实验中我们初步接触Docker的概念和基本用法.需要依次完成下面几项任务: 理解Docker是什么 学习如何在Linux上安装Docker 学习如何 ...
- 【204】显示3D大球球
1. 光滑球 From Jan 28, 2016 2. 大球球 https://www.revolvermaps.com/?target=enlarge&i=0xoqkxnu52c&a ...
- Docker容器日志管理最佳实践
目录 一 .Docker 引擎日志 二.容器日志 2.1.常用查看日志命令--docker logs 2.2 .Docker 日志 驱动 三. 生产环境中该如何储存容器中的日志 一.当是完全是标准输出 ...
- 机器学习--DIY笔记与感悟--①K-临近算法(2)
上一篇博客我手动写了KNN算法,并且之后用手写的算法预测了约会的成功率. 而今天,我在大神博客的指导下调用sklearn这个库来预测图片的内容. 一.前期准备 由于我这里使用的是mac版本,而skle ...
- POJ2576【背包】
题意: 每个人必须在一个团队或其他; 人对两支球队的数量不得超过1不同; 人们对各队的总重量应尽可能接近相等越好. 思路: 那么我求一个能接近最接近总和一半的值. 每个人的值就是物品,每个物品有且只有 ...
- python多线程批量下载远程图片
python多线程使用场景:多线程采集, 以及性能测试等 . 数据库驱动类-简单封装下 mysqlDriver.py #!/usr/bin/python3 #-*- coding: utf-8 -*- ...
- Zeppelin的入门使用系列之创建新的Notebook
前期博客 hadoop-2.6.0.tar.gz + spark-1.6.1-bin-hadoop2.6.tgz + zeppelin-0.5.6-incubating-bin-all.tgz(mas ...
- SpringMVC + ajax
1.ajax 返回汉字乱码 解决方法: http://blog.sina.com.cn/s/blog_5f39177b0101it7h.html //方案一 response.setCharacter ...
- Jmeter安装说明
本文主要介绍Jmeter工具的安装 一.安装JDK 1.下载jdk,到官网下载jdk,下载jkd1.8即可,地址:http://www.oracle.com/technetwork/java/java ...