ASP截取网址URL中的顶级域名正则表达式_正则表达式_黑客防线网安服务器维护基地--Powered by WWW.RONGSEN.COM.CN

ASP截取网址URL中的顶级域名正则表达式

作者:黑客防线网安网站维护基地 来源:黑客防线网安 浏览次数:0

黑客防线网安网讯:函数功能从提交的URL中提取顶级域名,失败返回空,注意要把可用的后缀全写到domext变量中。
函数功能从提交的URL中提取顶级域名失败返回空注意要把可用的后缀全写到domext变量中
 
function durlck(url)
domext="com|net|org|cn|co.kr|com.cn"
durlck="" : url=lcase(url)
if url="" or len(url)=0 then exit function
url=replace(replace(url,"http://",""),"https://","")
s1=instr(url,":")-1 '过滤掉端口
if s1 < 0 then s1=instr(url,"/")-1 '过滤掉/后面的字符 
if s1 > 0 then url=left(url,s1)
Set re = new RegExp
re.IgnoreCase = True : re.global = True
re.Pattern = "([a-z0-9-]){1,63}\.(" & domext & ")(\:\d+)?$"
Set Matches = re.Execute(url) 
durlck = Matches(0)
set re=nothing
end function
    黑客防线网安服务器维护方案本篇连接:http://www.rongsen.com.cn/show-4775-1.html
网站维护教程更新时间:2011-02-24 14:37:56  【打印此页】  【关闭
我要申请本站N点 | 黑客防线官网 |  
专业服务器维护及网站维护手工安全搭建环境,网站安全加固服务。黑客防线网安服务器维护基地招商进行中!QQ:29769479

footer  footer  footer  footer