asp ½ØÈ¡ÎļþÀ©Õ¹Ãû

ÎÒÓÐÒ»¸öÎļþÃû  aaa.bbb.rar»òÕßa.b.c.d.html»òÕßaa.b.dd.shtml
ÎÒÔõÑù½ØÈ¡ÎļþµÄºó׺Ãûѽ¡£¡£¡£

---

<%
aa="aaa.bbb.rar"
bb=split(aa,".")
response.write bb(ubound(bb))
%>

---

ÐÞ¸ÄÒ»ÏÂÂ¥ÉϵĴúÂë¡£
VBScript code:
<%
aa="aaa.bbb.rar"
bb=split(aa,".")
if ubound(bb)=0 then
response.write ""
else
response.write trim(bb(ubound(bb)))
end if
%>

---

s = "F:\aaa\xxx.aaa.txt"
Response.Write("ÎļþÃû: " & Mid(s, InStrRev(s, "\") + 1, Len(s) - InStrRev(s, "\")))
Response.Write("Îļþºó׺: " & Mid(s, InStrRev(s, ".") + 1, Len(s) - InStrRev(s, ".")))

---

http://www.bhcode.net/article/20080721/1820.html

---

path="aaa.bbb.rar"
kzname=split(path,".")(ubound(split(path,".")))

---

VBScript code:
path="aaa.bbb.rar"
kzname=split(path,".")(ubound(split(path,".")))