Question

asp split 如何把一句话分割成单个字？

也可以用其他函数
只要是ASP能做出来就行了
比如 有一句话

中国人真伟大

我想把他分割开成
中,国,人,真,伟,大

Answer 1

List="中国人真伟大"
m=Len(List)
j=1
do while j<=m
t_data_temp=t_data_temp&mid(List,j,1)&","
j=j+1
loop
If InStr(Right(t_data_temp,1),",")>0 Then
t_data_temp=Left(t_data_temp,Len(t_data_temp)-1)
end if
Response.Write(t_data_temp)
以上程序代码，不过那个LEN函数最好用这个自定义函数替换：
Function CheckStringLength(txt)
Dim x,y,ii
txt=trim(txt)
x = len(txt)
y = 0
for ii = 1 to x
if asc(mid(txt,ii,1))<0 or asc(mid(txt,ii,1))>255 then
y = y + 2
else
y = y + 1
end if
next
CheckStringLength = y
End Function

追问

用那个函数替代len 变成了

中,国,人,真,伟,大,,,,,,

是怎么回事呢？

Answer 2

split 是把字符串拆分为数组
(0)和(1)分别是数组的第一个元素值和第二个元素值

追问

我明白。。。我想把一句话拆分成一个个的字 请问如何操作