asp判断域名为几级域名

Dim domain,url,re url="http://www." 'url是要判断的网址.. Set re=new regExp re.Global=True re.Ignorecase=True re.pattern="^((?:http:\/\/)?[^\/]*)(?:(?:\/?)|(?:\/.*))" url=re.Replace(url,"$1") domain=Replace(url,"http://","") domain=Replace(domain,"www.","") response.write url&"<br />是"&UBound(Split(domain,"."))&"级域名"