asp获取文件名和扩展名的函数代码

asp获取文件名和扩展名的函数代码

<%
Function getFilename(text)
text = Left(text,inStrRev(fl,".")-1)
getFilename = text

End Function

Function getExtn(text)
text = Left(text,inStr(text,".")-1)
getExtn = text
End Function
%>