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,".")))
相关问答：
HTML code:
dim jf
set conn=server.createobject("adodb.connection")
connstr="Driver={Sql Server};Server="&Sqlip&";Database="&Sqldb&";Uid="& ......
我们有一个网站模板，www.c111.com.cn,希望修改一些地方：
1）点击左侧“服务品牌”的其中一个小分类，如“足球”，界面的右侧就出现如www.c111.com.cn/1.jpg，点击1.jpg上方的其中一个品牌logo，下面就出现相关的� ......
<%On Error Resume Next
Set conn=Server.CreateObject("ADODB.Connection")
conn.begintrans
conn.Open ("Driver={SQL Server};server=(local);uid=sa;database=student;pwd=")
......
文件：folder.inc
HTML code:
<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+&qu ......
在一个发表文章的页面，如果中途关闭页面，这提示是否放弃编辑，
如果点击放弃，则转向填写放弃原因的界面，
如果点不放弃，这停留在原页面，
如果是点击页面的超级链接，则触发事件失效
如何编写代 ......
