InstrRev函数,从字符串的最后一个搜索起,前面字符串。
举例来说明其应用:
以下为引用的内容: <% Dim strTXT,pos strTXT="www.webjx.com" pos=instrRev(strTXT,".") Response.Write pos %> |
我们搜索的起始是倒序,从com前的一个点。起始的字符的长度,含此点,共十个字符,返回的结果将是9。
通过此原理,我们就可以取得文件名,域名后缀名等。
以下为引用的内容: <% Dim aa,bb,cc,dd aa=Request.Servervariables("url") bb=InstrRev(aa,"/") cc=len(aa) dd=Right(aa,cc-bb) Response.Write dd %> |
时间: 2024-09-13 22:43:48