01.
<%
02.
Option
Explicit
03.
Dim
strSplit
04.
strSplit = Split(
"1,2,3"
,
","
)
05.
Response.write strSplit(0)&
"<br>"
06.
Response.write strSplit(1)&
"<br>"
07.
Response.write strSplit(2)&
"<br>"
08.
09.
Response.write(
"<hr>"
)
10.
11.
Dim
strSplit2,i
12.
strSplit2 = Split(
"a,b,c,d,e"
,
","
)
13.
For
i = 0
To
UBound(strSplit2)
14.
Response.write strSplit2(i)&
"<br>"
15.
Next
16.
17.
18.
19.
20.
21.
22.
%>