asp之字符串函数示例

asp之字符串函数示例
用字符串函数对字符串进行截头去尾、大小写替换等操作。

函数	语法	功能
len	len(string|varname)	返回字符串内字符的数目，或是存储一变量所需的字节数。
trim	trim(string)	将字符串前后的空格去掉
ltrim	ltrim(string)	将字符串前面的空格去掉
rtrim	rtrim(string)	将字符串后面的空格去掉
mid	mid(string,start,length)	从string字符串的start字符开始取得length长度的字符串，如果省略第三个参数表示从start字符开始到字符串结尾的字符串
left	left(string,length)	从string字符串的左边取得length长度的字符串
right	right(string,length)	从string字符串的右边取得length长度的字符串
lcase	lcase(string)	将string字符串里的所有大写字母转化为小写字母
ucase	ucase(string)	将string字符串里的所有大写字母转化为大写字母
strcomp	strcomp(string1,string2[，compare])	返回string1字符串与string2字符串的比较结果，如果两个字符串相同，则返回0，如果小于则返回-1，如果大于则返回1
instr	instr(string1,string2[, compare])	返回string1字符串在string2字符串中第一次出现的位置
split	split(string1,delimiter[, count[, start]])	将字符串根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格("")作为分隔符。 count 返回的子字符串数目，-1 指示返回所有子字符串。 start为 1 执行文本比较；如果为 0 或者省略执行二进制比较。
replace	replace(expression, find, replacewith[, compare[, count[, start]]])	返回字符串，其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。

1、len函数示例：

下面的示例利用 len 函数返回字符串中的字符数目：

dim mystringmystring = len("vbscript") 'mystring 包含 8。2、trim、ltrim、rtrim函数示例：

下面的示例利用 ltrim, rtrim, 和 trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格：

dim myvarmyvar = ltrim("  vbscript ")  'myvar 包含 "vbscript "。myvar = rtrim("  vbscript ")  'myvar 包含 "  vbscript"。myvar = trim("  vbscript ")   'myvar 包含"vbscript"。

3、mid函数示例：

下面的示例利用 mid 函数返回字符串中从第四个字符开始的六个字符：

dim myvarmyvar = mid("vb脚本is fun!", 4, 6) 'myvar 包含 "script"。

4、left函数示例：

下面的示例利用left 函数返回mystring 的左边三个字母：

dim mystring, leftstringmystring = "vbscript"leftstring = left(mystring, 3) 'leftstring 包含 "vbs

5、right函数示例：

下面的示例利用 right 函数从字符串右边返回指定数目的字符：

dim anystring, mystranystring = "hello world"      '定义字符串。mystr = right(anystring, 1)    '返回 "d"。mystr = right(anystring, 6)    ' 返回 " world"。mystr = right(anystring, 20)   ' 返回 "hello world"。6、lcase函数示例：

下面的示例利用 lcase 函数把大写字母转换为小写字母：

dim mystringdim lcasestringmystring = "vbscript"lcasestring = lcase(mystring) ' lcasestring 包含 "vbscript"。7、 ucase函数示例：

下面的示例利用 ucase 函数返回字符串的大写形式：

dim mywordmyword = ucase("hello world")    ' 返回"hello world"。

8、strcomp函数示例：

下面的示例利用 strcomp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。

dim mystr1, mystr2, mycompmystr1 = "abcd": mystr2 = "abcd"       '定义变量。mycomp = strcomp(mystr1, mystr2, 1)    ' 返回 0。mycomp = strcomp(mystr1, mystr2, 0)    ' 返回 -1。mycomp = strcomp(mystr2, mystr1)       ' 返回 1。

9、instr示例：

下面的示例利用 instr 搜索字符串：

dim searchstring, searchchar, mypossearchstring ="xxpxxpxxpxxp"???searchchar = "p"??mypos = instr(searchstring, searchchar)???'返回 9.注意：返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。

10、split函数示例：

dim mystring, myarray, msg
mystring = "vbscriptxisxfun!"
myarray = split(mystring, "x",-1,1)
' myarray(0) contains "vbscript".
' myarray(1) contains "is".
' myarray(2) contains "fun!".
response.write(myarray(0))

11、replace函数示例：

replace("abcd", "bc", "12")   '得到a12d