| 范文 |
asp验证ip函数,以前老是用javascript验证ip,这次写一下asp验证ip函数
function IsValidIP(StrIP)
IsValidIP = True
dim StrTemp,i
StrTemp = split(StrIP,".")
if ubound(StrTemp) <> 3 then
IsValidIP = Flase
exit function
end if
for i = 0 to 3
if not isnumeric(StrTemp(i)) then
IsValidIP = Flase
exit function
else
if StrTemp(i) < 0 or StrTemp(i) > 255 then
IsValidIP = Flase
exit function
end if
end if
next
end function
试试看看能用么？ |