&

ASP截取網址URL中的頂級域名正則表達式

admin

2011年6月22日 1:22 本文熱度 3415

函數功能從提交的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

該文章在 2011/6/22 1:22:30 編輯過

關鍵字查詢

網址

url

域名

正在查詢...

點晴ERP是一款針對中小制造業的專業生產管理軟件系統,系統成熟度和易用性得到了國內大量中小企業的青睞。

點晴PMS碼頭管理系統主要針對港口碼頭集裝箱與散貨日常運作、調度、堆場、車隊、財務費用、相關報表等業務管理，結合碼頭的業務特點，圍繞調度、堆場作業而開發的。集技術的先進性、管理的有效性于一體，是物流碼頭及其他港口類企業的高效ERP管理信息系統。

點晴WMS倉儲管理系統提供了貨物產品管理,銷售管理,采購管理,倉儲管理,倉庫管理,保質期管理,貨位管理,庫位管理,生產管理,WMS管理系統,標簽打印,條形碼,二維碼管理,批號管理軟件。

點晴免費OA是一款軟件和通用服務都免費，不限功能、不限時間、不限用戶的免費OA協同辦公管理系統。

91网首页-91网页版-91网在线观看-91网站免费观看-91网站永久视频-91网站在线播放

ASP截取網址URL中的頂級域名正則表達式