判断IP地址是否合法的sql2000使用存储过程跟函数

最新推荐文章于 2022-06-19 12:14:33 发布

iteye_1503

最新推荐文章于 2022-06-19 12:14:33 发布

阅读量114

点赞数

sql存储过程判断IP是否合法

CREATE PROCEDURE sp_IsValidIP
@strIPAddress nvarchar(32)='192.168.1.250',
@rstFlag bit =0 OUTPUT
AS
Declare @strIP nvarchar(16) ----存放IP地址去空格字符串
Declare @tempIP nvarchar(16) ----存放临时IP地址字符串
Declare @tempIPLen int ----存放IP地址字符串长度

Declare @ValidFlag_1 bit----存放IP地址字符是否是数字类型
Declare @ValidFlag_2 bit----存放IP地址字符是否是数字类型
Declare @ValidFlag_3 bit----存放IP地址字符是否是数字类型
Declare @ValidFlag_4 bit----存放IP地址字符是否是数字类型

Declare @tempFlag_1 bit ----存放IP地址字符是否是合格数据
Declare @tempFlag_2 bit ----存放IP地址字符是否是合格数据
Declare @tempFlag_3 bit ----存放IP地址字符是否是合格数据
Declare @tempFlag_4 bit ----存放IP地址字符是否是合格数据

Declare @strIP_1 nvarchar(4) ----存放IP地址第一部分
Declare @strIP_2 nvarchar(4) ----存放IP地址第二部分
Declare @strIP_3 nvarchar(4) ----存放IP地址第三部分
Declare @strIP_4 nvarchar(4) ----存放IP地址第四部分

Declare @tempPoint_1 int ----存放IP地址中小数点位置
Declare @tempPoint_2 int ----存放IP地址中小数点位置
Declare @tempPoint_3 int ----存放IP地址中小数点位置
Declare @tempPoint_4 int ----存放IP地址中小数点位置

set @strIP=RTRIM(LTRIM(@strIPAddress))
set @tempIPLen=Len(@strIP)

set @tempIP= @strIP
select @tempPoint_1= CHARINDEX('.',@tempIP)
set @strIP_1=substring(@strIP,0,@tempPoint_1)--获取第一个IP地址字符段

SELECT @tempFlag_1=ISNUMERIC(@strIP_1)
IF(@tempFlag_1=1)
begin
IF((@tempPoint_1>1) AND ( @tempPoint_1<5) AND convert(INT,@strIP_1,4)>=0 AND convert(INT,@strIP_1,4) <=255)
SET @ValidFlag_1=1
ELSE
SET @ValidFlag_1=0
end

IF(@ValidFlag_1 =1)
BEGIN
set @tempIP=substring( @strIP,@tempPoint_1+1,@tempIPLen-@tempPoint_1)
select @tempPoint_2= CHARINDEX('.',@tempIP)
set @strIP_2=substring(@tempIP,0,@tempPoint_2)--获取第二个IP地址字符段

SELECT @tempFlag_2=ISNUMERIC(@strIP_2)
IF(@tempFlag_2=1)
begin
IF((@tempPoint_2>1) AND ( @tempPoint_2<5) AND convert(INT,@strIP_2,4)>=0 AND convert(INT,@strIP_2,4) <=255)
SET @ValidFlag_2=1
ELSE
SET @ValidFlag_2=0
end

IF(@ValidFlag_2=1)
BEGIN
set @tempIP=substring( @strIP,@tempPoint_1+@tempPoint_2+1,@tempIPLen-@tempPoint_1-@tempPoint_2)
select @tempPoint_3= CHARINDEX('.',@tempIP)
set @strIP_3=substring(@tempIP,0,@tempPoint_3)--获取第三个IP地址字符段

SELECT @tempFlag_3=ISNUMERIC(@strIP_3)
IF(@tempFlag_3=1)
begin
IF((@tempPoint_3>1) AND ( @tempPoint_3<5) AND convert(INT,@strIP_3,4)>=0 AND convert(INT,@strIP_3,4) <=255)
SET @ValidFlag_3 =1
ELSE
SET @ValidFlag_3 =0
end

IF(@ValidFlag_3 =1)
BEGIN
set @strIP_4=substring(@strIP,@tempPoint_1+@tempPoint_2+@tempPoint_3+1,@tempIPLen-@tempPoint_1-@tempPoint_2-@tempPoint_3)

SELECT @tempFlag_4=ISNUMERIC(@strIP_4)
IF(@tempFlag_4=1)
begin
IF(convert(INT,@strIP_4,4)>=0 AND convert(INT,@strIP_4,4) <=255)
SET @rstFlag =1
ELSE
SET @rstFlag =0
end
END
--获取第四个IP地址字符段
END
END

select @tempPoint_1, @tempPoint_2, @tempPoint_3, @tempPoint_4
select @strIP_1,@strIP_2,@strIP_3,@strIP_4,@rstFlag
GO

sql函数判断IP是否合法

CREATE FUNCTION IsValidIP(@strIPAddress nvarchar(32))
RETURNS int
AS
BEGIN
Declare @rstFlag int
Declare @strIP nvarchar(16) ----存放IP地址去空格字符串
Declare @tempIP nvarchar(16) ----存放临时IP地址字符串
Declare @tempIPLen int ----存放IP地址字符串长度

set @rstFlag=0
set @strIP=RTRIM(LTRIM(@strIPAddress))
set @tempIPLen=Len(@strIP)

set @tempIP= @strIP
select @tempPoint_1= CHARINDEX('.',@tempIP)
set @strIP_1=substring(@strIP,0,@tempPoint_1)--获取第一个IP地址字符段

SELECT @tempFlag_2=ISNUMERIC(@strIP_2)
IF(@tempFlag_2=1)
begin
IF((@tempPoint_2>1) AND ( @tempPoint_2<5) AND convert(INT,@strIP_2,4)>=0 AND convert(INT,@strIP_2,4) <=255)
SET @ValidFlag_2=1
ELSE
SET @ValidFlag_2=0
end

IF(@ValidFlag_2=1)
BEGIN
set @tempIP=substring( @strIP,@tempPoint_1+@tempPoint_2+1,@tempIPLen-@tempPoint_1-@tempPoint_2)
select @tempPoint_3= CHARINDEX('.',@tempIP)
set @strIP_3=substring(@tempIP,0,@tempPoint_3)--获取第三个IP地址字符段

SELECT @tempFlag_3=ISNUMERIC(@strIP_3)
IF(@tempFlag_3=1)
begin
IF((@tempPoint_3>1) AND ( @tempPoint_3<5) AND convert(INT,@strIP_3,4)>=0 AND convert(INT,@strIP_3,4) <=255)
SET @ValidFlag_3 =1
ELSE
SET @ValidFlag_3 =0
end

IF(@ValidFlag_3 =1)
BEGIN
set @strIP_4=substring(@strIP,@tempPoint_1+@tempPoint_2+@tempPoint_3+1,@tempIPLen-@tempPoint_1-@tempPoint_2-@tempPoint_3)

SELECT @tempFlag_4=ISNUMERIC(@strIP_4)
IF(@tempFlag_4=1)
begin
IF(convert(INT,@strIP_4,4)>=0 AND convert(INT,@strIP_4,4) <=255)
set @rstFlag=1
ELSE
set @rstFlag=0
end
END
--获取第四个IP地址字符段
END
END
RETURN (@rstFlag)
END