杰者的备忘录

当前位置:   网站首页 >> ASP

ASP的参数名按ASCII码从小到大排序(字典序)函数

各种各样的API接口签名都是要求对参数名先进行排序的,其他语言还好,自带了排序功能,ASP没有自带排序函数,只能自己定义。

这个函数并不是我写的,而是很多年前从支付宝的DEMO里面挖到的。


参数传数组进去,然后返回值是已经按ASCII码从小到大(也就是ABCDEFG...这样的)排序好的数组。


Function SortPara(sPara)

 Dim nCount

 nCount = ubound(sPara)

 For i = nCount To 0 Step -1

  minmax = sPara( 0 )

     minmaxSlot = 0

     For j = 1 To i

            mark = (sPara( j ) > minmax)

         If mark Then 

             minmax = sPara( j )

             minmaxSlot = j

         End If

     Next

  If minmaxSlot <> i Then 

   temp = sPara( minmaxSlot )

   sPara( minmaxSlot ) = sPara( i )

   sPara( i ) = temp

  End If

 Next

 SortPara = sPara

end Function

 

发表我的评论

Hi,您需要填写昵称和邮箱!

  • 必填项