国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發 > 綜合 > 正文

sql地址尋路算法(省市區路)

2024-07-21 02:48:30
字體:
來源:轉載
供稿:網友
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是查找方式的存儲過程,返回省市區路,代碼:

 1 ALTER pROCEDURE [dbo].[GetAddress] 2 @address varchar(100), 3  @NProvinceName varchar(30) OUTPUT, 4  @NCityName     varchar(30) OUTPUT, 5  @NDistrictName varchar(30) OUTPUT, 6  @NRoadName     varchar(50) OUTPUT, 7  @remain        varchar(50) OUTPUT, 8  @PostCode      varchar(7) OUTPUT, 9  @Road          varchar(100) output,    --新增,要插入road的路名 10  @method        int        output,11  @number        int         output,12  @insert        bit   =1           --新增,是否插入13 AS14 BEGIN15 16 set @address=replace(@address,' ','');    --空格17 set @address=replace(@address,'    ','');    --制表符18 set @address=replace(@address,'0','0');    --數字19 set @address=replace(@address,'1','1');    --數字20 set @address=replace(@address,'2','2');    --數字21 set @address=replace(@address,'3','3');    --數字22 set @address=replace(@address,'4','4');    --數字23 set @address=replace(@address,'5','5');    --數字24 set @address=replace(@address,'6','6');    --數字25 set @address=replace(@address,'7','7');    --數字26 set @address=replace(@address,'8','8');    --數字27 set @address=replace(@address,'9','9');    --數字28 29   set @method=130   set @number=031   32   create table #temp(NProvinceName varchar(30),NCityName varchar(30),NDistrictName varchar(30),33                      NRoadName varchar(50),remain  varchar(50),PostCode varchar(7) ,Road varchar(100),method int,number int)34 35   while @method<=536   begin37     exec ResAddress @address,@NProvinceName output,@NCityName output,38                   @NDistrictName output,@NRoadName output,@remain output,@PostCode output,@Road output,@method output,@number output39 40     insert into #temp values (@NProvinceName,@NCityName,@NDistrictName,@NRoadName,@remain,@PostCode,@Road,@method,@number)41 42     select @NProvinceName=null,@NCityName=null,@NDistrictName=null,@NRoadName=null,@remain=null,@PostCode=null,@number=0,@Road=null43     set @method=@method+144   end 45 46 /*47  select top 1 @NProvinceName=NProvinceName,@NCityName=NCityName,@NDistrictName=NDistrictName,48           @NRoadName=NRoadName,@remain=remain,@PostCode=PostCode ,@method=method,@number=number,@Road=Road from #temp order by number desc49 */50 51  select top 1 @NProvinceName=dbo.F_Convert(NProvinceName,0),@NCityName=dbo.F_Convert(NCityName,0),@NDistrictName=dbo.F_Convert(NDistrictName,0),52               @NRoadName=dbo.F_Convert(NRoadName,0),@remain=dbo.F_Convert(remain,0),@PostCode=dbo.F_Convert(PostCode,0) ,53               @method=dbo.F_Convert(method,0),@number=dbo.F_Convert(number,0),@Road=dbo.F_Convert(Road,0) from #temp order by number desc54  55  if (@Road is not null) and (@insert=1)56     begin57       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))58       insert into Road(fid,title,flag,text) values(left(@road,36),RIGHT(@road,LEN(@ROAD)-36),2,RIGHT(@road,LEN(@ROAD)-36))59     end60   drop table #temp61 END
View Code

ResAddress是查找方式中需要調用的存儲過程,其中有number這個返回一個數字,數字越大表示查找的難度就越大,代碼:

  1 ALTER pROCEDURE [dbo].[ResAddress]  2   3 @address varchar(100),  4  @NProvinceName varchar(30) OUTPUT,  5  @NCityName     varchar(30) OUTPUT,  6  @NDistrictName varchar(30) OUTPUT,  7  @NRoadName     varchar(50) OUTPUT,  8  @remain        varchar(50) OUTPUT,  9  @PostCode      varchar(7) OUTPUT, 10  @Road          varchar(100) output,    --新增,要插入road的路名  11  @method        int        output, 12  @number        int        output 13  14 AS 15 BEGIN 16  17 DECLARE @id            varchar(36) 18 declare @fid           varchar(36) 19 declare @text          varchar(30) 20  21  22 declare @NAddress      varchar(200) 23 set @NAddress=@address 24  25  26 if @method=1    --查找方式 省市區路 27 begin 28 select top 1 @NProvinceName=title ,@id=id,@text=text from province where left(@Address,len(text)) like '%'+text+'%'  order by len(text) desc   29   if (@NProvinceName is not null)  30   begin 31       set @number=@number+1                   --找到省計數加1 32       select @id=id from province where title=@NProvinceName and shengid is not null 33       set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'') 34   end  35  36  37 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 38     if (@NCityName is not null)  39     begin 40        set @number=@number+1 41        select @id=id from city where title=@NCityName and shiid is not null 42        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'') 43     end 44  45 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 46     if (@NDistrictName is not null) 47     begin 48        set @number=@number+1 49         select @id=id from district where title=@NDistrictName and shiid is not null 50        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'') 51     end 52  53 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 54     if (@NRoadName is not null)  55     begin 56        set @Address=stuff(@Address,charindex(@text,@Address),LEN(@text),'') 57        set @number=@number+1 58     end 59  60 if @text is not null 61 set @remain=right(@NAddress,len(@NAddress)-charindex(@text,@NAddress)-len(@text)+1) 62 else  63 set @remain=@Address 64  65 if (@NRoadName is null) and (@NDistrictName is not null)  66     goto GetRoad  67 else  68     goto finished   69 end 70  71 if @method=2                    --查找方式 省區路 72 begin 73   select top 1 @NProvinceName=title ,@id=id,@text=text from province where left(@Address,len(text)) like '%'+text+'%' or
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 抚州市| 乌鲁木齐县| 沿河| 武夷山市| 绥芬河市| 胶南市| 宣恩县| 班玛县| 宣威市| 义乌市| 望奎县| 公安县| 政和县| 阳朔县| 岐山县| 景泰县| 深州市| 大兴区| 芦山县| 民县| 长兴县| 沙湾县| 芦山县| 无为县| 宜章县| 遂溪县| 武夷山市| 惠州市| 上思县| 资源县| 禄丰县| 新巴尔虎右旗| 长垣县| 年辖:市辖区| 伊宁市| 富民县| 泽州县| 雅江县| 高阳县| 鹿泉市| 仪征市|