兄弟们帮个忙关于字符串重新排序的问题

[MosquitoWeb]

有一个字符串如下
"images/pic/1.jpg|images/pic/2.jpg|images/pic/3.jpg|images/pic/4.jpg|images/pic/5.jpg|images/pic/6.jpg|images/pic/7.jpg|images/pic/8.jpg|images/pic/9.jpg|images/pic/10.jpg|images/pic/11.jpg|images/pic/12.jpg"
求一个函数将其转成如下
"images/pic/2.jpg|images/pic/1.jpg|images/pic/3.jpg|images/pic/4.jpg|images/pic/5.jpg|images/pic/6.jpg|images/pic/12.jpg|images/pic/8.jpg|images/pic/10.jpg|images/pic/9.jpg|images/pic/11.jpg|images/pic/7.jpg"
我想写一个函数能让它重新随机排序一下但没什么好的方法,请教一下高手!这样的函数怎么样写?

谢谢!!

[boyle0630]

1.用分裂函數將原字串分成數組得到此數組的length（記為len）
2.用隨機函數產生從1到len之間的整數作為數組的下標
3.將隨機出來的下標所對應的數組元素串成一個新字符串
這樣應該差不多了吧

[MosquitoWeb]

谢谢楼上的兄弟,我是这想想的.但实现起来好像很麻烦,有没有例子之类的呢/

[MosquitoWeb]

顶一下，这个问题搞不定啊。

[toury]

strOld = "images/pic/1.jpg |images/pic/2.jpg |images/pic/3.jpg |images/pic/4.jpg |images/pic/5.jpg |images/pic/6.jpg |images/pic/7.jpg |images/pic/8.jpg |images/pic/9.jpg |images/pic/10.jpg |images/pic/11.jpg |images/pic/12.jpg"

arrChar = Split(strOld, "|")
strNew = ""
Randomize
For I = 1 To 12
  temp = Trim(arrChar(Int((12 * Rnd))))
  If strNew = "" Then
    strNew = temp
  Else
    If InStr(strNew, temp) > 0 Then
      I = I - 1
    Else
      strNew = strNew & "|" & temp
    End If
  End If
Next

response.write strNew