【摘要】 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 MyString
MyString = Len("VBSCRIPT") 'MyString 包含 8。
2、Trim、Ltrim、Rtrim函数示例：
下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格：
Dim MyVar
MyVar = LTrim(" vbscript ") 'MyVar 包含 "vbscript "。
MyVar = RTrim(" vbscript ") 'MyVar 包含 " vbscript"。
MyVar = Trim(" vbscript ") 'MyVar 包含"vbscript"。
3、Mid函数示例：
下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：
Dim MyVar
MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "Script"。
4、Left函数示例：
下面的示例利用Left 函数返回MyString 的左边三个字母：
Dim MyString, LeftString
MyString = "VBSCript"
LeftString = Left(MyString, 3) 'LeftString 包含 "VBS"
5、Right函数示例：
下面的示例利用 Right 函数从字符串右边返回指定数目的字符：
Dim AnyString, MyStr
AnyString = "Hello World" '定义字符串。
MyStr = Right(AnyString, 1) '返回 "d"。
MyStr = Right(AnyString, 6) ' 返回 " World"。
MyStr = Right(AnyString, 20) ' 返回 "Hello World"。
6、LCase函数示例：
下面的示例利用 LCase 函数把大写字母转换为小写字母：
Dim MyString
Dim LCaseString
MyString = "VBSCript"
LCaseString = LCase(MyString) ' LCaseString 包含 "vbscript"。
7、 UCase函数示例：
下面的示例利用 UCase 函数返回字符串的大写形式：
Dim MyWord
MyWord = UCase("Hello World") ' 返回"HELLO WORLD"。
8、StrComp函数示例：
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。
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. 注意：返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
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 函数
返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。
Replace(expression, find, replacewith[, start[, count[, compare]]])
参数
expression
必选项。字符串表达式 包含要替代的子字符串。
Find
必选项。被搜索的子字符串。
Replacewith
必选项。用于替换的子字符串。
Start
可选项。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。在和count 关联时必须用
count
可选项。执行子字符串替换的数目。如果省略，默认值为 -1，表示进行所有可能的替换。在和 start 关联时必须用。
Compare
可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略,缺省值为 0 ,这意味着必须进行二进制比较。
设置
compare 参数可以有以下值：
常数 值 描述
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文本比较。
返回值
Replace 返回以下值：
如果 Replace 返回
expression 为零长度 零长度字符串 ("")。
expression 为 Null 错误。
find 为零长度 expression 的副本。
replacewith 为零长度 expression 的副本，其中删除了所有由 find 参数指定的内容。
start > Len(expression) 零长度字符串。
count 为 0 expression 的副本。
说明
Replace 函数的返回值是经过替换（从由 start 指定的位置开始到 expression 字符串的结尾）后的字符串，而不是原始字符串从开始至结尾的副本。
下面的示例利用 Replace 函数返回字符串：
Dim MyString
MyString = Replace("XXpXXPXXp", "p", "Y") '二进制比较从字符串左端开始。返回 "XXYXXPXXY"。
MyString = Replace("XXpXXPXXp", "p", "Y", '文本比较从第三个字符开始。返回 "YXXYXXY"。3，, -1, 1)
Replace("ABCD", "BC", "12") '得到A12D
'如果从第一个字符开始只替换第一次匹配,则
Replace("ABCDBC", "BC", "12",1,1) '得到A12DBC 本站搜索： asp 函数
[在Google上搜索相关文章] [在百度上搜索相关文章]
【郑重声明】 本站所有文章除注有来源网址外均为互联网首发，按照 创造共用方式授权,允许相关网站转载，但必须标明作者名称并在明显位置作好原文网址链接(复制以上链接)，且不能运用于任何商业目的。 —— 建筑知识引擎小组 
| 
站长公告![pipcn.com[at]gmail.com](/blog/UploadFiles/2006-5/528948306.png){kind=small}
