Left(string, length)
参数：
string 字符串表达式，其最左边的字符被返回
length 数值表达式，指明要返回的字符数目
返回值：
返回指定数目的从字符串的'左边'算起的字符
InStrRev(string1, string2[, start[, compare]])
参数：
string1 必选。'接受搜索'的字符串表达式
string2 必选。'被搜索'的字符串表达式
start 可选。数值表达式，用于设置每次搜索的开始位置(从左边开始查指定的长度，然后在这个位置往左开始查找被搜索的字符)。如果省略，则默认值为 -1，表示从最后一个字符的位置开始搜索
compare 可选。在计算子字符串时，指示要使用的比较类型的数值。如果省略，将执行二进制比较
返回值：
返回<'被搜索'的字符串>在<'接受搜索'的字符串>中出现的从'结尾'计起的位置
E.g
Dim TestString
TestString=InStrRev("the quick brown fox jumps over the lazy dog", "the")
Response.write(TestString) '输出: 32
从右侧开始找"the",见红色的标记.那么这个the所在的位置是多少呢？这里的位置是相对左侧而言的.也可参见附件:对照表
Dim TestString
TestString=InStrRev("the quick brown fox jumps over the lazy dog", "the", 18)
Response.write(TestString) '输出: 1
理解：加第三个参数18后，就相当于是在"the quick brown fo"里从右面开始搜索,显然the的位置为1.也可参见附件:对照表
Dim TestString
TestString=InStrRev("the quick brown fox jumps over the lazy dog", "quick", 18)
Response.write(TestString) '输出: 5
理解：加第三个参数18后，就相当于是在"the quick brown fo"里从右面开始搜索,显然quick的位置为5.也可参见附件:对照表
如果还没有理解，就再见一个例子：
Dim TestString
TestString=InStrRev("the quick brown fox jumps over the lazy dog", "o", 18)
Response.write(TestString) '输出: 18
理解：加第三个参数18后，就相当于是在"the quick brown fo"里从右面开始搜索,显然o显示在18的位置上.也可参见附件:对照表
具体应用:
应用一:实现本文件所在的INTERNET地址，不包括本文件名
Dim theurl
theurl="http://" & Request.ServerVariables("http_host") & left(Request.ServerVariables("url"),instrRev(Request.ServerVariables("url"),"/"))
Response.Write theurl
应用二:得到本文件名
Dim filename
filename=Request.ServerVariables("PATH_TRANSLATED")
filename=right(filename,(len(filename)-instrRev(filename,"\")))
Response.Write filename
评论: 0 | 引用: 0 | 查看次数: 607 |
返回顶部
赞