日期:2014-05-17 浏览次数:20887 次
<% Dim Str,str1,str2 Str="abc 2, def 45,fffff 110,ruele 4," str1=split(Str,",") for i=0 to ubound(str1) response.Write str1(i)&"<br>" '可以省略 response.Write right(trim(str1(i)),len(trim(str1(i)))-instr(trim(str1(i))," "))&"<br>" next 'response.write str2 %>
------解决方案--------------------
<%
Dim Str,str1,str2
Str="abc 2, def 45,fffff 110,ruele 4,"
str1=split(Str,",")
for i=0 to ubound(str1)
response.Write str1(i)&"<br>"
response.Write right(trim(str1(i)),len(trim(str1(i)))-instr(trim(str1(i))," "))&"<br>"
next
'response.write str2
%>