易截截图软件、单文件、免安装、纯绿色、仅160KB

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,".")))



相关问答:

ASP简单问题

conn.asp

<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath("Connt ......

asp文件解密

我有一个asp源码,但是出现一个文件,我用asp解密都是乱码
请教

VBScript code:
??

 %# , #&')*)-0-(0%()(?

(((((((((((((((((((((((((( ......

一段asp转php

<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......

asp触发事件问题

在一个发表文章的页面,如果中途关闭页面,这提示是否放弃编辑,
如果点击放弃,则转向填写放弃原因的界面,
如果点不放弃,这停留在原页面,
如果是点击页面的超级链接,则触发事件失效

如何编写代 ......

asp删除字符串的问题

<a href=http://www.baidu.com>百度 </a> <!--这里的内容不想要了--> <a href=http://www.g.cn>google </a> <!--这里的内容不想要了--> <a href=http://www.sogou.com>s ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号