asp之字符串函數(shù)示例
用字符串函數(shù)對(duì)字符串進(jìn)行截頭去尾、大小寫替換等操作。 函數(shù) 語(yǔ)法 功能
Len Len(string|varname) 返回字符串內(nèi)字符的數(shù)目，或是存儲(chǔ)一變量所需的字節(jié)數(shù)。
Trim Trim(string) 將字符串前后的空格去掉
Ltrim Ltrim(string) 將字符串前面的空格去掉
Rtrim Rtrim(string) 將字符串后面的空格去掉
Mid Mid(string,start,length) 從string字符串的start字符開始取得length長(zhǎng)度的字符串，如果省略第三個(gè)參數(shù)表示從start字符開始到字符串結(jié)尾的字符串
Left Left(string,length) 從string字符串的左邊取得length長(zhǎng)度的字符串
Right Right(string,length) 從string字符串的右邊取得length長(zhǎng)度的字符串
LCase LCase(string) 將string字符串里的所有大寫字母轉(zhuǎn)化為小寫字母
UCase UCase(string) 將string字符串里的所有大寫字母轉(zhuǎn)化為大寫字母
StrComp StrComp(string1,string2[，compare]) 返回string1字符串與string2字符串的比較結(jié)果，如果兩個(gè)字符串相同，則返回0，如果小于則返回-1，如果大于則返回1
InStr InStr(string1,string2[, compare]) 返回string1字符串在string2字符串中第一次出現(xiàn)的位置
Split Split(string1,delimiter[, count[, start]]) 將字符串根據(jù)delimiter拆分成一維數(shù)組，其中delimiter用于標(biāo)識(shí)子字符串界限。如果省略，使用空格("")作為分隔符。
count 返回的子字符串?dāng)?shù)目，-1 指示返回所有子字符串。
start為 1 執(zhí)行文本比較；如果為 0 或者省略執(zhí)行二進(jìn)制比較。
Replace Replace(expression, find, replacewith[, compare[, count[, start]]]) 返回字符串，其中指定數(shù)目的某子字符串(find)被替換為另一個(gè)子字符串(replacewith)。
1、Len函數(shù)示例：
下面的示例利用 Len 函數(shù)返回字符串中的字符數(shù)目：
Dim MyString
MyString = Len("VBSCRIPT") 'MyString 包含 8。
2、Trim、Ltrim、Rtrim函數(shù)示例：
下面的示例利用 LTrim, RTrim, 和 Trim 函數(shù)分別用來(lái)除去字符串開始的空格、尾部空格、 開始和尾部空格：
Dim MyVar
MyVar = LTrim(" vbscript ") 'MyVar 包含 "vbscript "。
MyVar = RTrim(" vbscript ") 'MyVar 包含 " vbscript"。
MyVar = Trim(" vbscript ") 'MyVar 包含"vbscript"。
3、Mid函數(shù)示例：
下面的示例利用 Mid 函數(shù)返回字符串中從第四個(gè)字符開始的六個(gè)字符：
Dim MyVar
MyVar = Mid("VB腳本is fun!", 4, 6) 'MyVar 包含 "Script"。
4、Left函數(shù)示例：
下面的示例利用Left 函數(shù)返回MyString 的左邊三個(gè)字母：
Dim MyString, LeftString
MyString = "VBSCript"
LeftString = Left(MyString, 3) 'LeftString 包含 "VBS
5、Right函數(shù)示例：
下面的示例利用 Right 函數(shù)從字符串右邊返回指定數(shù)目的字符：
Dim AnyString, MyStr
AnyString = "Hello World" '定義字符串。
MyStr = Right(AnyString, 1) '返回 "d"。
MyStr = Right(AnyString, 6) ' 返回 " World"。
MyStr = Right(AnyString, 20) ' 返回 "Hello World"。
6、LCase函數(shù)示例：
下面的示例利用 LCase 函數(shù)把大寫字母轉(zhuǎn)換為小寫字母：
Dim MyString
Dim LCaseString
MyString = "VBSCript"
LCaseString = LCase(MyString) ' LCaseString 包含 "vbscript"。
7、 UCase函數(shù)示例：
下面的示例利用 UCase 函數(shù)返回字符串的大寫形式：
Dim MyWord
MyWord = UCase("Hello World") ' 返回"HELLO WORLD"。
8、StrComp函數(shù)示例：
下面的示例利用 StrComp 函數(shù)返回字符串比較的結(jié)果。如果第三個(gè)參數(shù)為 1 執(zhí)行文本比較；如果第三個(gè)參數(shù)為 0 或者省略執(zhí)行二進(jìn)制比較。
Dim MyStr1, MyStr2, MyComp
MyStr1 = "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, MyPos
SearchString ="XXpXXpXXPXXP"???
SearchChar = "P"??
MyPos = Instr(SearchString, SearchChar)???'返回 9.
注意：返回的不是一個(gè)字符串在另一個(gè)字符串中第一次出現(xiàn)的字符位置，而是字節(jié)位置。
10、Split函數(shù)示例：
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函數(shù)示例：
Replace("ABCD", "BC", "12") '得到A12D