在ASP(Active Server Pages)中,你可以使用VBScript或JScript来截取域名。以下是一个使用VBScript的示例,该示例从完整的URL中提取域名:
<%
Function GetDomainName(url)
Dim objRegex, matches, match
Set objRegex = New RegExp
objRegex.Pattern = "^(?:https?:\/\/)?(?:www\.)?([^/]+).*"
objRegex.IgnoreCase = True
objRegex.Global = False
Set matches = objRegex.Execute(url)
If matches.Count > 0 Then
Set match = matches.Item(0)
GetDomainName = match.SubMatches.Item(0)
Else
GetDomainName = ""
End If
Set objRegex = Nothing
End Function
Dim url
url = "http://www.example.com/some/path"
Response.Write(GetDomainName(url)) ' 输出: example.com
%>