<%
lname="123.txt"
la=split(lname,"/")
num=ubound(la)
lb=split(la(num),".")
num2=ubound(lb)
response.Write("."&lb(num2))
%>
<br>
<%
lname="123.asp"
la=split(lname,"/")
num=ubound(la)
lb=split(la(num),".")
num2=ubound(lb)
response.Write("."&lb(num2))
%>
<br>
<%
lname="123.jpg"
la=split(lname,"/")
num=ubound(la)
lb=split(la(num),".")
num2=ubound(lb)
response.Write("."&lb(num2))
%>
<br>
<%
lname="123.rar"
la=split(lname,"/")
num=ubound(la)
lb=split(la(num),".")
num2=ubound(lb)
response.Write("."&lb(num2))
%>
復制運行就可以看到效果