用asp获取域名中间一段

来源：百度知道 编辑：UC知道 时间：2024/06/17 10:58:12
下面这个域名中,我想提取最中间那一段. 我想提取中间那一段: cldz888出来.该程序如何写:
www.cldz888.am020.com
意思就是说,最第一个点与第二个点中间那段字符,该如何写?在线等答案.

<%
Function cutstr(str)
dim a,b,c
a=instr(str,".")
c=a+1
b=instr(c,str,".")
cutstr=mid(str,c,b-c)
End Function

'函数调用示例
dim domain
domain="wddww.cldz888.am020.com"
response.Write(cutstr(domain))
%>

以上代码执行后输出“cldz888"，即截取第一和第二个点之间的字符，达到你想要的效果了。