回 帖 发 新 帖 刷新版面

主题:怎样将分割的字符取出来???

我有个文本框,我的效果是让文本框的数据从大到小排列
比如我输入1,6,3,4
则输出的是6,4,3,1

回复列表 (共7个回复)

沙发

JavaScrip 的 String对象有排序方法

板凳

输出降序排列 
select ** from .....desc 不是可以做到吗?

3 楼

不用数据库怎么输出?

4 楼

第一次发贴时搞错了,这次才是完整的算法。
<%
str="1,6,34,4,55,33,22,11,77,10"
dim Arrstr
Arrstr=split(Str,",")
for j=0 to ubound(Arrstr)
    for i=0 to ubound(Arrstr)-1
      if Cint(Arrstr(i+1))>Cint(Arrstr(i)) Then
       temp=Arrstr(i)
       Arrstr(i)=Arrstr(i+1)
       Arrstr(i+1)=temp
      End If
    Next
Next
for i=0 to ubound(Arrstr)
  if a="" Then
   a=Arrstr(i)
  else
   a=a&","&Arrstr(i)
  end if

next
response.write(a)
%>
测试成功,此代码用了一个排序算法,这个算法的名字给忘了叫什么了,可能叫冒泡排序法吧

5 楼


运用ASP的函数: split()

例如:

str为文本框的名字,

str=request.form("str") '获取文本框中的值

str1=split(str,",") '将文本框中的值以逗号(,)为分割符分割为一个数组

'然后循环取出数组各值

for i=0 to ubound(str1)

num=str1(i)

next

对了,你是想用ASP,还是vbscript,还是javascript?

6 楼

对了,你是想用ASP,还是vbscript,还是javascript?

这个无所谓

7 楼

不错,,可我看不懂啊,能不能解释下,或者有关的资料。。。。

[quote]<%
str="1,6,3,4"'Request("InputName")'如STR="1,6,3,4"
dim Arrstr
Arrstr=split(Str,",")
for i=0 to ubound(Arrstr)-1
  if Arrstr(i+1)>Arrstr(i) Then
   temp=Arrstr(i+1)
   Arrstr(i+1)=Arrstr(i)
   Arrstr(i)=temp
  End If
Next
for i=0 to ubound(Arrstr)

  if a="" Then
   a=Arrstr(i)
  else
   a=a&amp;","&amp;Arrstr(i)
  end if
next
response.write(a)
%>
测试成功,此代码用了一个排序算法,这个算法的名字给忘了叫什么了,可能叫冒泡排序法吧[/quote]

我来回复

您尚未登录,请登录后再回复。点此登录或注册