2020-02-16 标签:asp,实现,重新,排序,数字,数组,代码,函数,neworder,arrstr,参数,rstr,逗号,分隔,作者,阿里,西西,日期,2007

'****************************** Function NewOrder(ArrStr) For i = 0 To Ubound(Split(ArrStr,","))If n > 0 ThenArrStr = Replace(ArrStr,n,0)End Ifsp