Split函数分割字符串的使用方法

Split函数

描述:返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
语法:Split(expression[, delimiter[, count[, compare]]])
Split函数语法有如下几个参数
expression 必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串(“”),Split则返回一个空数组,即没有元素和数据的数组。
delimiter 可选的。用于标识子字符串边界的字符串字符。如果忽略,则使用空格字符(” “)作为分隔符。如果delimiter是一个长度为零的字符串,则返回的数组仅包含一个元素,即完整的 expression字符串。
count 可选的。要返回的子字符串数,-1表示返回所有的子字符串。
compare 可选的。数字值,表示判别子字符串时使用的比较方式。关于其值,请参阅“设置值”部分。

设置值

compare参数的设置值如下:

常数 描述
vbUseCompareOption -1 用Option Compare语句中的设置值执行比较。
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文字比较。
vbDatabaseCompare 2 仅用于Microsoft Access。基于您的数据库的信息执行比较。
最常见的用法即
数组=Split(“字符串”,”分隔符”)
例子:
比如关键词用“,”分割:”ASP,学习,函数”这段字符串用Split来处理。
<%
dim str
str=Split("ASP,学习,函数",",",-1)
%>
第一个关键词<%=str(0)%><br>
第二个关键词<%=str(1)%><br>
第三个关键词<%=str(2)%><br>
写了一小段代码,输入一串关键词用空格隔开,然后用Split来处理:
<%
txt=request.QueryString("txt")

if txt<>"" then
%>
<%
str=Split(txt," ",-1)
%>
<%for i=0 to ubound(str)%>
第<%=(i+1)%>个关键词:<%=str(i)%><br>
<%next%>
<%else%>
<form action="splitkey.asp" method="get">
<p>请输入关键词用空格隔开<br />
<input type="text" name="txt" /></p>
<input type="submit" value="提交" />
</form>
<%end if%>

转自blueidea论坛的一个隐藏IP的代码:
<%
function hiddenIP(fstring)
dim str1,str2,str3,str
str = split(fstring,".")
str1 = str(0)
str2 = str(1)
str3 = str(2)
fstring = str1 & "." & str2 & "." & str3 & ".*"
hiddenIP = fstring
end function
%>
调用时:
<% = hiddenIP("192.168.1.14")%>