繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp之字符串函数示例
- ASP
- asp #include命令
- 推荐下天枫常用ASP函数封装，推荐大家使用
- asp最简单最实用的计数器
- 用asp实现的iframe批量替换工具
- ASPWebPack 代码 提供下载
- asp分页生成html的程序脚本代码
- 比较不错的asp单表单字段多条件查询
- asp下用replace非正则实现代码运行功能的代码
- UpdatePanel触发javascript脚本的方法附代码
- 生成EAN13标准的条形码的ASP代码实例
- asp空间奸商查询系统
- ASPWebPack(整站文件备份系统) v1.0.2 黑客也用
- ASP+FSO可视化目录编历（可增、删、改）下载
- 提高ASP效率的五大技巧
- ASP生成随机字符串(数字+大小写字母)的代码
- ASP下存储过程编写入门全接触
- 利用 cache 做对比静态页的网页技术
- ASP生成静态文件编码为UTF-8格式的HTML文件
- ASP下的两个防止SQL注入式攻击的Function
- asp下的风讯用的SQL通用防注入模块提供了
ASP 中的 asp之字符串函数示例
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 36 ::
收藏到网摘: n/a
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用于标识子字符串界限。如果省略，使用空格("")作为分隔符。 |
| 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
评论 (0) All
